Помогите пожалуйстанужно написать код программы картинка есть

Question

Помогите пожалуйста
нужно написать код программы
картинка есть

---

Answer 1

Var

a: integer;
b,s: real;

begin

a:=5;
b:=3.5;
s:=a+b;
s:=2*s-b;
write(s);
end.

Comments

спасибо)