В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Julianovikova6
Julianovikova6
19.05.2023 14:45 •  Информатика

Люди добрые, на ! вычислить в паскаль: 1. y = x - x³\3 + x⁵\52. y = 2⁻ˣ - cosx + sin (2xy)3. y = x²-7x+10\x²-8x+124. y = x - 10sinx + | x⁴ - x⁵ |нужно написать коды программ и результаты их работы

Показать ответ
Ответ:
artem16021artemka16
artem16021artemka16
09.10.2020 21:35
program task31177829;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.

во втором примере синус принимает переменную Y как значение? если так, то на 14 строке измените на:

y := Power(2, -x) - Cos(x) + Sin(2*x*y);
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота