Нужна помощь!
Мне нужны только сами программы, можно даже не все, а, хотя бы два номера. Но желательно, конечно, все.
Заранее спасибо
Мне нужны только сами программы, можно даже не все, а, хотя бы два номера. Но желательно, конечно, все.
Заранее спасибо
Answers & Comments
1) var y,x:real;
begin
writeln('Введите значение x: ');
readln(x);
y:=x-(sqr(x)*x/3)+(sqr(x)*sqr(x)*x)/5;
writeln('y = ',y);
end.
2) var y,x,z:real;
begin
writeln('Введите значение x: ');
readln(x);
writeln('Введите значение y: ');
readln(y);
z:=exp(-x*ln(2))-cos(x)+sin(2*x*y);
writeln('z = ',z);
end.
3) var y,x:real;
begin
writeln('Введите значение x: ');
readln(x);
y:=(sqr(x)-7*x+10)/(sqr(x)-8*x+12);
writeln('y = ',y);
end.
4) var y,x:real;
begin
writeln('Введите значение x: ');
readln(x);
y:=x-10*sin(x)+abs(sqr(x)*sqr(x)-sqr(x)*sqr(x)*x);
writeln('y = ',y);
end.