Question

Для проверки нужно прислать колы программ и результаты их работы.
.
РЕБЯТА, помогите пожалуйста, прошу... в прошлой школе у меня не было информатики. Я совсем не понимаю ничего. Решите прошу((( даю 15б

Answer 1

                                     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.