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

Приложения:

Ответы

Ответ дал: thegr1f
0

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 функции tg(x) нет, поэтому её заменили на frac{sin(x)}{cos(x)}

Ответ дал: GoodMan08
0
Это не закончено
Ответ дал: thegr1f
0
Всё закончено, расчёт и вывод z
Вас заинтересует