1 2 3 4 5 6 7 8 9
program belazor; var r,c:integer; begin writeln('Введите два слагаемых'); readln (r); readln (c); writeln('Сумма ',r, ' + ', c, ' равна ',r+c); readln(); end.