var a, b:Integer; begin writeln('Введите первое число'); readln(a); writeln('Введите второе число'); readln(b); writeln('Ваш результат сложения:', a + b); writeln('Ваш результат вычитания:', a - b); writeln('Ваш результат умножения:', a * b); writeln('Ваш результат деления:', a / b); end.
Pascal
var
a, b:Integer;
begin
writeln('Введите первое число');
readln(a);
writeln('Введите второе число');
readln(b);
writeln('Ваш результат сложения:', a + b);
writeln('Ваш результат вычитания:', a - b);
writeln('Ваш результат умножения:', a * b);
writeln('Ваш результат деления:', a / b);
end.