Автор - darya8443 7 лет назад

помогите пожалуйста!!!

Ответ

Проверено экспертом

Автор - thedomidy

program task31133790;
var
y: real;
x: integer;
begin
Writeln('ПЕРВОЕ ЗАДАНИЕ: ');
Readln(x);
y := x - (Power(x, 3)/3) + (Power(x, 5)/5);
Writeln('Y = ', y);
Writeln('ВТОРОЕ ЗАДАНИЕ: ');
// если здесь всё-таки sin(2*x*y), то пишем Sin(2*x*y)
// в таком случае оно возьмёт значение y из предыдущих рассчётов
Readln(x);
y := Power(2, -x) - Cos(x) + Sin(2*x);
Writeln('Y = ', y);
Writeln('ТРЕТЬЕ ЗАДАНИЕ: ');
Readln(x);
y := (Power(x, 2) - 7*x + 10)/(Power(x, 2) - 8*x + 12);
Writeln('Y = ', y);
Writeln('ЧЕТВЁРТОЕ ЗАДАНИЕ: ');
Readln(x);
y := x - 10*Sin(x) + Abs(Power(x, 4) - Power(x, 5));
Writeln('Y = ', y);
end.

Предыдущий вопрос Следующий вопрос

Ответы и объяснения

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.

© 2026 Все права защищены Политика конфиденциальности Контакты