program teste;
uses crt;
var
a,b,c: Integer;
begin
clrscr;
writeln('Informe o número de a.:');
readln(a);
writeln('Informe o número de b.:');
readln(b);
c:=a+b;
writeln('Resultado da Soma é.:',c);
end.
Att
Professor Vinícius
sexta-feira, 16 de abril de 2010
Assinar:
Postar comentários (Atom)
Nenhum comentário:
Postar um comentário