Program summ;
uses crt;
var
a, b : integer;
begin
writeln('Введи первое значение:');
readln(a);
writeln('Введи второе значение:');
readln(b);
clrscr();
writeln(a + ' + ' + b + ' = ' + (a+b));
writeln(a + ' - ' + b + ' = ' + (a-b));
writeln(a + ' * ' + b + ' = ' + (a*b));
writeln(a + ' : ' + b + ' = ' + (a/b));
end.