Написать программу в паскале z=1-e^2a*sin^3(2a)/кореньcos(a) как считаю я: program example1; var a,z: real; begin writeln('введите число a'); readln(a); z: =1-exp(2*a)*sin(2*a*3)/sqrt(cos(a)); writeln('вычислить=',z); end. но программа выдает ошибку, не пойму в чём дело, подскажите .
Program example1; Var a,z:real; begin writeln('Введите число a'); readln(a); z:=1-exp(ln(e)*2*a)*exp(ln(sin(2*a))*3)/sqrt(cos(a)); writeln('Z= ',z); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
