program urazbaev;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes
{ you can add units after this };
var a,b,c:integer;
begin
writeln ('Введите 1 слагаемое');
readln (a);
writeln ('Введите 2 слагаемое');
readln (b);
writeln ('Результат');
writeln (a+b);
readln ();
end.