Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
KarinATseGeLnyK
16.02.2021 20:41 •
Информатика
Вычислить значение у по формуле у-5х³-8х²+х-6 усли вводимое х нечетное вычислить пока у< 6000
Показать ответ
Ответ:
tyler02169
27.08.2020 01:42
Program dfgd;
var y:real;
x:integer;
begin
write('х=');
readln(x);
if (x mod 2) <> 0
then begin y:=5*sqr(x)*x+8*sqr(x)-x+6;
if y>6000
then writeln('y>6000')
else writeln('y=',y);
end
else writeln('x - четное число');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
sonyabush12345
23.06.2021 00:51
Напишите программу,которая преобразует строку,содержащую фамилию,имя и отчество человека,к форме инициалы фамилия С плюс...
Андрей99951
25.03.2020 19:11
Написать программу для вычисления функции f=x4+x3-x2-10. ...
58584
20.05.2020 22:00
ДО 11:30 по мск СДАТЬ НУЖНО...
0Neder0
20.05.2020 22:00
Отдаю все бааллы ЛЕГКОЕ ЗАДАНИЕ...
Наденька2000
08.09.2021 16:46
Практикалық жоба деген не? дам ...
Arina111933
08.09.2021 16:46
1 Дано двузначное число ( вводится пользователем с клавиатуры). Написать программу, которая даст пользователю ответ входит ли в его число цифра 6 2 Дано целое число...
Нурик2266
23.03.2021 11:27
сборка копьютера контроша Соберите 3 вида компютера игровой,офисный,серверный...
нананавай
19.03.2021 08:56
Существуют два вида сносок укажите 1.простая( сноска размещается внизу страницы , содержащей текст) и концевая ( сноска размещается внизу последней страницы текстового...
АлфавитABC
14.05.2020 10:51
Написать программу которая просит ввести число и выдает сколько знаков у этого числа (например вводим число 345 - выдает что там 3 знака) Как сделать, что бы программа...
morozovasanya
11.07.2020 20:37
А) у Коли было 120 р. о 14 работыше, чем у сти. И в 2 раза меньше, чем у Васи Скоко генеральник в вместеУ Коли было 120 руб это в четыре раза больше чем у Пети...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var y:real;
x:integer;
begin
write('х=');
readln(x);
if (x mod 2) <> 0
then begin y:=5*sqr(x)*x+8*sqr(x)-x+6;
if y>6000
then writeln('y>6000')
else writeln('y=',y);
end
else writeln('x - четное число');
end.