ответ: Проверенно
program ggfh;
var
a, b: integer;
begin
Writeln('Введите 1 число', ':');
readln(a);
Writeln('Введите 2 число', ':');
readln(b);
Writeln('Сумма ', a + b, ';', ' Произведение ', a * b, '.');
end.
Это Pascal? Если да, то
program z1;
var a, b, x, y: integer;
read (a, b);
x=a+b;
y=a*b;
writeln ('сумма =', x);
writeln ('произведение =', y);
ответ: Проверенно
program ggfh;
var
a, b: integer;
begin
Writeln('Введите 1 число', ':');
readln(a);
Writeln('Введите 2 число', ':');
readln(b);
Writeln('Сумма ', a + b, ';', ' Произведение ', a * b, '.');
end.
Это Pascal? Если да, то
program z1;
var a, b, x, y: integer;
begin
read (a, b);
x=a+b;
y=a*b;
writeln ('сумма =', x);
writeln ('произведение =', y);
end.