Jump to content
Sign in to follow this  
UnReal

Exercicios

Recommended Posts

UnReal

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!

Share this post


Link to post
Share on other sites
UnKnowN

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 :thumbsup:

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)

Share this post


Link to post
Share on other sites
joninho

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

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


[shadow=red,left]:thumbsup:[/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

Share this post


Link to post
Share on other sites
UnKnowN

Já copias-te e colas-te por isso já nao perciso de fazer nada :thumbsup:

Dúvidas sobre o "programitah" aqui ...

P.S.: Continuo a achar que as letras do Code sao minusculas :thumbsup:

Share this post


Link to post
Share on other sites
Warrior

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.

Share this post


Link to post
Share on other sites
UnKnowN

Sim eu já sabia disso (da divisão) ... mas é sempre bom estar explícito com exemplos :thumbsup:

Bom Trabalho

Share this post


Link to post
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
Sign in to follow this  

×
×
  • 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.