Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Vankoed
08.03.2020 15:39 •
Информатика
Программа выполняется в паскале! даны натуральные числа от 35 до 87. найти и напечатать те из них, которые при делении на 7 остаток 1, 2 или 5. .
Показать ответ
Ответ:
Vikos009
03.07.2020 17:49
Var i :integer;
Begin
for i := 35 to 87 do
if (i mod 7 = 1) or (i mod 7 = 2) or (i mod 7 = 5) then
writeln(i);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Желейка0Анжелька
12.10.2021 16:46
Для какого из значений числа x ложно высказывание: не (x 6) или (x 5)? варианты ответов: 1) 7 2)6 3)5 4)4 решение....
magoomamedzadeh
21.01.2023 03:15
Умоляю, (pascalabc 9 класс). массив состоит из 30 элементов,в промежутке от -2 до 65. найти минимальное из положительных чисел,и максимальное из отрицательных....
Crownglas
31.03.2020 07:07
Вычти 1 умножь на 3 из 7 получишь 13(5 команд)...
Akureyri
11.01.2021 01:19
Написать словесный алгоритм, блок-схему и программу сравнения числа с числом заданным случайным образом. c: =random()*50-25...
maksim5a
08.08.2021 08:18
Қандай ақпараттың көмегімен қойылған мәселені шешуге болады...
k03a12345
10.09.2020 01:51
НА PYTHON: Написать программу, которая выводит ваш возраст в формате: Вам XX ГОД/ГОДА/ЛЕТ ; нужно чтоб было правильное слово именно, типа года, год ,лет. БЕЗ СПАМА...
роллы6
02.05.2020 05:22
у меня Сор по информатике...
Terhiop
01.05.2020 10:30
Вставить слово в предложении my brother play the guitar really well 1) cans 2) has 3)can 4) is...
ronlimjy
01.05.2020 10:30
Расмотрите в учебнике рисунок 74 напиши кратко какова роль фотоосинтеза в жизни растений...
Z8Z
01.05.2020 10:30
Выполни деление с остатком в столбик: 240728: 34...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
for i := 35 to 87 do
if (i mod 7 = 1) or (i mod 7 = 2) or (i mod 7 = 5) then
writeln(i);
End.