Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Veronika691
08.07.2020 11:16 •
Информатика
Найти максимальное натуральное число меньше 5000, которое делится нацело на 39.
Показать ответ
Ответ:
AzalieySagaz
01.10.2020 22:25
Var a,b:integer;
begin
for a:=1 to 4999 do
begin
if (a mod 39=0) then b:=a;
end;
writeln(b);
end.
ответ:Число 4992
0,0
(0 оценок)
Популярные вопросы: Информатика
alex20294
30.03.2023 19:35
1) текст составлен с использованием алфавита мощностью 64 символа и содержит 500 символов. какой информационный объем текста?...
tylerxjosh
18.12.2020 09:11
Как следует вводить символьное значение?...
Russiangirl27
19.02.2022 02:41
Нужно написать программу на языке паскаль условие такое: вводится 15 чисел определить каких чисел кратных трём больше положительных или отрицательных...
MariyamGaraeva
24.08.2022 05:37
Какие файлы пакуются плотнее всего? вариант 1 тексты вариант 2 рисунки вариант 3 видео вариант 4 звуки...
Neronminecraft
04.06.2021 04:52
Сформировать массив b, содержащий суммы элементов строк матрицы a. pascal abc...
creatorX
04.06.2021 04:52
Найти максимальный элемент матрицы. pascal abc...
feliz3600
11.08.2021 01:50
Вкакое из перечисленных отраслей хозяйства россии занято наибольшее количество населения? 1)промышленность 2)сельское хозяйство 3)транспорт и связь 4)строительство. пождалуйста...
Leerok
11.08.2021 01:50
Коровка,ножка,шоколадка,травка.какая орфограмма? ? заранее !...
Chakachoco
11.08.2021 01:50
Числа которые делятся на 8 с остатком 3...
Карина2203
11.08.2021 01:50
Художественно переведите текст. london london is the capital of great britain it lies on the both banks of the river thames. london is one of the largest cities in the world....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
for a:=1 to 4999 do
begin
if (a mod 39=0) then b:=a;
end;
writeln(b);
end.
ответ:Число 4992