Program name;
var a,b,x,y:real;
begin
writeln('Введите значение переменной a');
readln(a);
writeln('Введите значение переменной b');
readln(b);
x:=a+b;
writeln('x = ',x);
y:=a*b;
writeln('y = ',y);
end.
Пример:
Введите значение переменной a
5
Введите значение переменной b
8
x = 13
y = 40