Написать программу к блок схеме,срочно плиз!!!

Question

Написать программу к блок схеме,срочно плиз!!!

---

Answer 1

var x, l, z:real;

begin

   write('Введите x: ');

   readln(x);

   write('Введите l: ');

   readln(l);

   z := power( (x*x + l), 1/5 ) + (sin(x) / cos(x)) - exp(x);

   writeln(z);

end.

В Pascal функции нет, поэтому её заменили на

Comments

Это не закончено

---

Всё закончено, расчёт и вывод z