• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

UnReal

Exercicios

8 mensagens neste tópico

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!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros 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 :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)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros 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.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

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

Bom Trabalho

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora