Для проверки нужно прислать колы программ и результаты их работы.
.
РЕБЯТА, помогите пожалуйста, прошу... в прошлой школе у меня не было информатики. Я совсем не понимаю ничего. Решите прошу((( даю 15б
.
РЕБЯТА, помогите пожалуйста, прошу... в прошлой школе у меня не было информатики. Я совсем не понимаю ничего. Решите прошу((( даю 15б
More Questions From This User See All
Answers & Comments
PascalABC.NET
1)
begin
var x := ReadReal('Введите x');
Writeln('y = ',x-x**2/3+x**6/4);
end.
2)
begin
var x := ReadReal('Введите x');
Writeln('y = ',Power(3,-x)+cos(x)-sin(x**2));
end.
3)
begin
var x := ReadReal('Введите x');
Writeln('y = ',(x**3+9*x+12)/(x**2-6*x+15));
end.
4)
begin
var x := ReadReal('Введите x');
Writeln('y = ',x+12*sin(2*x)+abs(x**3+x**5));
end.