logo
Войти Регистрация Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
kopatirina94
kopatirina94
17.10.2020 15:25 •  Информатика

Найти максимальное натуральное число меньше 5000, которое делится нацело на 39.

Показать ответ
Ответ:
Stiv191001
Stiv191001
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 оценок)
Популярные вопросы: Информатика
delfin4
delfin4
20.09.2022 02:22
Таблица, содержащая информацию о свойствах отдельных объектов, принадлежащих одному классу, является таблицей типа​...
ОвССянка
ОвССянка
15.03.2022 15:58
Информатика 9 класс Написать программу На вход в программу поступает 1 число. Программа формирует еще два числа по принципу убавления и прибавления числа 1 от основного (входящего)....
ivansndreev1223
ivansndreev1223
09.09.2020 03:43
Постройте логическое выражение, соответствующее схеме, ИСПОЛЬЗУЙТЕ AND, OR, NOT...
faystt
faystt
01.12.2020 15:26
Черепашка нарисовала узор по следующему алгоритму: опустить хвост вперед(40) вправо(90) вперед(20) вправо(90) вперед(20) вправо(90) вперед(40) влево(90) вперед(20) влево(90) вперед(20)...
Змейкп
Змейкп
23.01.2020 11:47
1)Дыбыс файлынын кенейтилими кандай? беремин отиниш...
HELP111111111111q
HELP111111111111q
04.05.2021 14:16
Удвоить число z,если оно положительное,во всех остальных случаях уменьшите его на 5.Написать программу Дано натуральное число X. Составить программу,выясняющую,делится ли данное...
vaaaadimg
vaaaadimg
26.12.2020 22:43
Памагите плезВроде 8 класс,хотя я в 10 но да ладно​...
polyakkate
polyakkate
24.04.2020 02:19
Создать трассировочную таблицу void fragment_1(int* c, int n) { int s, i, k, j, b = 0; for (s = 0, i = 0; i n; i++) { for (k = 0, j = 0; j n; j++) { if (c[i] == c[j]) k++; } if...
aslan2002761
aslan2002761
14.03.2020 23:05
, здесь что-то лёгкое​...
никита3227
никита3227
17.04.2021 07:52
Решить два хамелеона соревнуются в беге.они бегут по стене от поло до потолка и обратно .первый хамелеон пробегает всю дистанцию с одинаковой скоростью,а 2 вверх бежит со скоростью...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота