Сложение двух чисел в Free Pascal IDE

uses crt;

var

a,b,c:integer;

begin

clrscr;

writeln('первое число');

readln(a);


writeln('второе число ');

readln(b);


c := a + b;


writeln('Sum ', c);


readln();

end.

или замени a и b на константы