[tex]y = x - 10 \sin \: x + | {x}^{4} - {x}^{5} | [/tex] Вычислить в Паскаль, прошу, помогите
Answers & Comments
MrMiner1
Для градусов: program n_1; uses math; var x, y:real; begin readln(x); y:=x-10*sin(x*Pi/180)+abs(Power(x, 4)-Power(x, 5)); writeln(y:0:10); end. Для радианов: program n_1; uses math; var x, y:real; begin readln(x); y:=x-10*sin(x)+abs(Power(x, 4)-Power(x, 5)); writeln(y:0:10); end.
Answers & Comments
program n_1;
uses math;
var x, y:real;
begin
readln(x);
y:=x-10*sin(x*Pi/180)+abs(Power(x, 4)-Power(x, 5));
writeln(y:0:10);
end.
Для радианов:
program n_1;
uses math;
var x, y:real;
begin
readln(x);
y:=x-10*sin(x)+abs(Power(x, 4)-Power(x, 5));
writeln(y:0:10);
end.