Задание:
Помогите написать программу в Паскале z=1-e^2a*sin^3 (2a) /кореньcos (a) Как считаю я: Program example1; Var a,z: real; beginwriteln ('Введите число a');
Решение:
Program example1; Var a,z: real; beginwriteln ('Введите число a'); readln (a); z: =1-exp (ln (e)*2*a)*exp (ln (sin (2*a)*3) /sqrt (cos (a); writeln ('Z=',z); end.
Знаете другой ответ?