Geupar
4 год назад
Написать программу в паскаль
ОТВЕТЫ
Toma
Oct 24, 2020
program K_1;var x:integer;y:real;begin
writeln('Введите x');readln(x);y:=sin(pi*x)+sqr(x)-sqrt(exp(x))/(cos(pi*x)+2-(sin(x)/cos(x)));writeln('y=',y:0:2);
readlnend.
writeln('Введите x');readln(x);y:=sin(pi*x)+sqr(x)-sqrt(exp(x))/(cos(pi*x)+2-(sin(x)/cos(x)));writeln('y=',y:0:2);
readlnend.
171
Смежные вопросы: