Предмет: Информатика,
автор: elisawetta2
ПОЖАЛУЙСТА! ПАСКАЛЬ!!! 10 КЛАСС! 25 БАЛЛОВ
Приложения:
Ответы
Автор ответа:
0
// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var x:=ReadReal('x=');
var y:=x-x**3/3+x**5/5; y.Println;
y:=2**(-x)-Cos(x)+Sin(2*y); y.Println;
y:=(x*x-7*x+10)/(x*x-8*x+12); y.Println;
y:=x-10*Sin(x)+Abs(x**4-x**5); y.Println
end.
Пример
x= 3.18
57.49861907136
2.05593197031244
0.645390070921986
226.492160641852
// Внимание! Если программа не работает, обновите версию!
begin
var x:=ReadReal('x=');
var y:=x-x**3/3+x**5/5; y.Println;
y:=2**(-x)-Cos(x)+Sin(2*y); y.Println;
y:=(x*x-7*x+10)/(x*x-8*x+12); y.Println;
y:=x-10*Sin(x)+Abs(x**4-x**5); y.Println
end.
Пример
x= 3.18
57.49861907136
2.05593197031244
0.645390070921986
226.492160641852
Похожие вопросы
Предмет: Английский язык,
автор: ekaterinaantonova559
Предмет: Русский язык,
автор: sasungalima
Предмет: Английский язык,
автор: ppp0ppp0pppgt
Предмет: Биология,
автор: ИванКриворуков
Предмет: География,
автор: вася258