Cod sursa(job #2101030)
Utilizator | Data | 6 ianuarie 2018 18:45:53 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.11 kb |
var a,b,S:integer;
BEGIN
write('Introdu numerele a,b:');Readln(a,b);
S:=a+b;
write ('Suma=',S);
End.