Напишите программу для выполнения этого примера для паскаля абц

Question

Напишите программу для выполнения этого примера для паскаля абц

---

Answer 1

Все в скриншоте,если что-то не так поправьте

---

Comments

спасибо братан,прям от души

Answer 2

Program n1;

Var x,y,z,a: real;

Begin

Writeln ('vvedite x,y,z');

Read (x,y,z);

a:=5*((2*x-z)/(3+y*y));

Writeln ('otvet: ', a:5:3);

End.