Cod sursa(job #705152)

Utilizator BarbaraNemeth Barbara Barbara Data 3 martie 2012 14:45:15
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.18 kb
uses crt;
var a, b, c: longint;

BEGIN
  clrscr;
  Write('A=');
  Read(a);
  Write('B=');
  Read(b);
  c:=a+b;
  WriteLn;
  WriteLn(a,'+',b,'=',c);
  ReadLn;
  ReadLn;
END.