terça-feira, 21 de agosto de 2007

INF01202 - Laboratório 1 - Exercício 1

Código fonte do exercício:

program Soma2;
{ Le dois numeros inteiros; imprime os dois numeros lidos e sua soma }
var
A, B: Real; Soma: Real;
begin
write('Valor de A: ');
readln(A);
write('Valor de B: ');
readln(B);
writeln('Valores lidos: ', A, ' ', B);
Soma := A + B; writeln('Soma: ', Soma:8:2); { Com os formatadores de Impressao, 8 digitos com 2 casas decimais }
end.

Nenhum comentário: