uses
sysutils;
var N1,N2,N3,N4, Soma: integer;
begin
try
Writeln('Digite o primeiro numero');
Readln(N1);
Writeln('Digite o segundo numero');
Readln(N2);
Writeln('Digite o terceiro numero');
Readln(N3);
Writeln('Digite o quarto numero');
Readln(N4);
Soma:= N1 + N2 + N3 + N4;
Writeln('A Soma e:', Soma);
Readln;
except
on E: Exception do
Writeln(E.ClassName, ': ', E.Message);
end;
existe algo errado nisso? meu compilador da um erro na Var Soma
por favor ajudem ai

Erro Nesse Codigo Em Pascal
Started By Jean_SysBox, 04/04/2011, 16:01
Nenhuma resposta neste tópico
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)