Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
SUPERMODEL
10.03.2021 04:09 •
Информатика
Является ли произведение цифр 3-значного числа четным? (работа с оператором while—wend)
Ответ:
Alina228321234
08.09.2020 07:24
CLSm = 100WHILE m < 999 f$ = STR$(m) f$ = MID$(f$, 2) h1$ = MID$(f$, 1, 1) h2$ = MID$(f$, 2, 1) h3$ = MID$(f$, 3, 1) k = VAL(h1$) * VAL(h2$) * VAL(h3$) IF k MOD 2 = 0 THEN PRINT h1$; "*"; h2$; "*"; h3$; "="; k END IF m = m + 1WEND
0,0
(0 оценок)
Популярные вопросы: Информатика
lizahelp7
05.04.2020 15:18
Напишите программу в на языке программирования Паскальy=x*x + 5*x +3...
hohotuchka
16.12.2021 12:21
Создать абстрактный класс Point (точка). На его основе создать классы ColoredPoint и Line. На основе класса Line создать класс ColoredLine и класс PolyLine (многоугольник). Все классы...
алиночка206
07.01.2022 00:09
Увеличить значение первого числа ...
Cocos228
10.01.2022 08:38
Программу вычесления значения функции y=3x-6...
shavkatbronduk1
10.01.2022 08:38
Описать ! uses crt; var s, sn, sg: string; i: integer; begin write( s= ); readln(s); sn: = ; for i: =1 to length(s) do if s[i]= . then sn: =sn+ else sn: =sn+s[i]; write( s= ,sn);...
Mezhanova16
23.07.2022 08:32
Ккакому типу относится общешкольная компьютерная сеть (в любой школе)? в ответе надо ввести прилагательное?...
ldontknow1
23.07.2022 08:32
Составить программу на языке паскаль.вычислить произведение отрицательных элементов одномерного массива а длины н стоящих на местах кратных 3...
arzanyaevanika
09.04.2022 20:51
Сделаете сказку-небылицу про собаку и кошку ( )...
Kolabonic3
29.09.2022 18:15
А. при попадании раствора кислоты на кожу, её следует промыть водой и обработать раствором питьевой соды. б. легковоспламеняющиеся жидкости, например ацетон, разрешается хранить...
Elizzzabethh
29.09.2022 18:15
Уменшаемое 351 вычитаемое 85+79 разность?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?