Jump to content

Exercicios


UnReal
 Share

Recommended Posts

Boas pessoal!

Começei agora na programação e decidi começar por pascal.

Bem ja tenho muitos sites com tutoriais e alguns documentos sobre a materia mas ainda n encontrei nada que tenha exercicios, isto é, um site ou e-book que nos de exercicios para fazermos, para treinar-mos (e claro se poder ter soluções para verificar no fim convinha n é?)...

Alguem sabe de algum site ou e-book ou mesmo um livro que recomende com exercicios para pascal?

Fiquem Bem!

Link to comment
Share on other sites

Faz um Programa em que o 'User' possa escolher entre dividir, somar, multiplicar ou subtrair 2 nºs, igualmente à sua escolha

Deixo aqui 1 pequeno programar de soma em que fui ajudado a desenvolver XD, quando ainda estava no início

program test;

uses crt; // nao sei para que serve 👍

var // indica abaixo as variaveis que serao usadas no programa

num1,num2,soma:integer; // num1 -> 1º número a somar (tem de ser inteiro), num2 -> 2º número a somar (tem de ser inteiro), int -> operação com nºs inteiros

begin // diga-se a iniciação do desenvolvimento do programa

clrscr; // quer dizer ClearScreen -> Limpa o Ecrã

textcolor(2+16); // indica a cor do texto (neste caso verde escuro)

write('1º número -> '); readln(num1); // O Programa inicia-se aparecendo escrito "1º número ->" após indicarmos o 1º número o sistema vai lê-lo daí a parte "readln(num1)" para ler o nº 1 e de seguida fazer a soma com o 2º número.

write('2º número -> '); readln(num2); // "2º número ->" após indicarmos o 2º número o sistema vai lê-lo daí a parte "readln(num2)" para ler o nº 2 e de seguida fazer a soma com o 1º número.

soma:=num1+num2; // indica a operação que vai ser feita. Nota: "Div" para divisão de números inteiros, "/" para divisão de números reais.

write('Soma -> '); write(soma); readln; // Indica o valor da soma o readln serve para descer a linha e consequente mente com a "célula" 'end' o programa se concluir.

end. // Indica o Fim do Programa

Parece confuso mas e pk esta com explicaçoes

Penso que Pascal é 1 linguagem muito boa para iniciação, ainda nao sei tudo (nem pouco mais ou menos XD)

Link to comment
Share on other sites

pah, edita isso, e mete isso em codigo... 👍 pa fikar mais bem arranjado tem la uma caixa d escolha ou tinha :s

[glow=red,2,300]tipo isto[/glow]


[shadow=red,left]👍[/shadow]


program test;
uses crt; // nao sei para que serve 

var // indica abaixo as variaveis que serao usadas no programa
num1,num2,soma:integer; // num1 -> 1º número a somar (tem de ser inteiro), num2 -> 2º número a somar (tem de ser inteiro), int -> operação com nºs inteiros

begin // diga-se a iniciação do desenvolvimento do programa

clrscr; // quer dizer ClearScreen -> Limpa o Ecrã

textcolor(2+16); // indica a cor do texto (neste caso verde escuro)

write('1º número -> '); readln(num1); // O Programa inicia-se aparecendo escrito "1º número ->" após indicarmos o 1º número o sistema vai lê-lo daí a parte "readln(num1)" para ler o nº 1 e de seguida fazer a soma com o 2º número.

write('2º número -> '); readln(num2); // "2º número ->" após indicarmos o 2º número o sistema vai lê-lo daí a parte "readln(num2)" para ler o nº 2 e de seguida fazer a soma com o 1º número.

soma:=num1+num2; // indica a operação que vai ser feita. Nota: "Div" para divisão de números inteiros, "/" para divisão de números reais.

write('Soma -> '); write(soma); readln; // Indica o valor da soma o readln serve para descer a linha e consequente mente com a "célula" 'end' o programa se concluir.

end. // Indica o Fim do Programa

Link to comment
Share on other sites

Já agora.. o "uses crt" serve para indicar a inclusão de uma biblioteca (neste caso a crt (sim, significa o mesmo que os monitores, catodyc ray tube)). Sem ela não poderias usar comandos como "clrscr" ou "textcolor". Tudo o resto funcionaria.

podes ter dois inteiros declarados

var a,b:integer;

e usar o "/", desde que o estejas a atribuir a um numero real. (c:real;)

Por exemplo:

var a,b:integer;
c:real;
begin
readln(a,b);
c:=a/b;
writeln(c);
end.

A diferença entre o "div" e o "/" é que o primeiro faz a divisao inteira e o segundo a "completa".

a,b:integer;
begin
a:=5;
b:=2;
writeln(a div b);
writeln(a/b);
end.

compara.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.