Cod sursa(job #1585)
Utilizator | Data | 14 decembrie 2006 09:26:19 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.14 kb |
program suma;
uses crt;
var a,b,S:integer;
begin
clrscr;
write('a=');read(a);
write('b=');read(b);
S:=0;
S:=a+b;
write(s);
readkey;
end.