Question

Напишите код программы (Pascal)
​

Answer 1

var s,a,b:real;

begin

a:=5;

b:=-3.5;

s:=a+b;

s:=2*s-b;

writeln('s = ',s);

end.