Question

Пожалуйста 2 номер.

Answer 1

Var
x,y:real;
begin
write('Введите x,y через пробел: ');
readln(x,y);
writeln(x,'+',y,' = ',x+y);
writeln(x,'-',y,' = ',x-y);
writeln(x,'*',y,' = ',x*y);
writeln(x,'/',y,' = ',x/y);
end.