переведите на язык pascal : 7(sin^2)*X-(1/2)*cosX
var
x,y:real;
begin
readln(x);
y:=7*sin(x)*sin(x)-0.5*cos(x);
writeln(y);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var
x,y:real;
begin
readln(x);
y:=7*sin(x)*sin(x)-0.5*cos(x);
writeln(y);
end.