Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
petrakovatatya
20.10.2020 18:27 •
Информатика
Программа паскаль: которая ищет минимальное число, больше 21, которое делится на 7 и оканчивается на 1.
Показать ответ
Ответ:
aselkulmagambet
08.10.2020 17:41
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var n:=21;
repeat
n+=1
until (n mod 7=0) and (n mod 10=1);
n.Println
end.
Результат
91
0,0
(0 оценок)
Популярные вопросы: Информатика
Svetarozen
02.01.2020 22:47
с информатикой! См.фото! ! Разработать функцию min(a,b) для нахождения минимального из двух чисел. Вычислить с нее значение выражения z=min(3x,2y)+min(x-y,x+y)...
zoyasvet
21.05.2022 03:11
C++ Дано файл, элементами которого являются целые числа. Определить количество цифр, которые принадлежат диапазону [a, b]....
jak15
15.09.2022 23:08
Построить ориентированный граф для автомата Мили. Автомат представляет собой циклический счетчик импульсов от 0 до 5. На выходе автомата формируется сигнал y = 0,...
svetokot2005
30.01.2021 01:08
Подробная информация о смартфоне?...
shildebaev01
20.03.2020 11:50
Язык python (питон)! нужно! заранее .1)напишите программу, которая вводит четырёхзначное натуральное число и переставляет его первую и последнюю цифры, например,...
gadjimira
18.09.2021 14:12
С++. как рассчитать среднее каждой строки двумерного массива?...
trostsnska
18.01.2020 07:58
Введите с клавиатуры две строки символов. допишите вторую строку в конец первой, после чего повторите эту операцию еще раз. далее выведите первую строку на экран....
Che11
17.07.2021 12:50
Укажите тип диаграммы которая отображает данные в виде пропорции 1) линейчатая 2) точечная 3) график 4) круговая...
ДобротаПротивЗла
11.07.2022 03:38
Составьте код на С++Сдвиньте массив влево на 1 шаг...
AnyMay00853
08.05.2020 14:58
Найди число строк в таблице, не считая шапки таблицы. Число переменных в выражении — 7....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
begin
var n:=21;
repeat
n+=1
until (n mod 7=0) and (n mod 10=1);
n.Println
end.
Результат
91