program adnare;
uses crt;

var a,b:integer;

begin
clrscr;

writeln ('Intoduceti primul numar');
readln (a);
writeln ('Introduceti al doilea numar');
readln (b);
writeln ('Suma celor doua numre este ',a+b);

delay (2000);

end.