tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти максимальное натуральное
Найти максимальное натуральное число меньше 5000, которое делится нацело на 39.
Cool281
1 08.06.2019 18:50
1
Ответы
adwa113eПомошник
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kanony
17.04.2020 15:19
Заданные одномерные массивы А, В с 10 чисел. Построить массив С, каждый элемент которого вычисляется как си = | sqr (ai-sqr (bi) │. печати массив С, максимальный элемент...
Dilyash2007
17.04.2020 15:19
В чем проблема? Должны выводиться дороги...
5alo
17.04.2020 15:19
Какие кнопки используются для добавления гиперссылки КОНКРЕТНО Четвёртый во ЗАРАНЕЕ...
BlackDiamondIce
25.01.2021 21:12
Люди , кто ни будь знает , про методы: .get , configure в питоне в библиотеке ткинтер напишите как его использовать и где ....
Акбота1ю
25.01.2021 21:03
Определить, сколько существует «счастливых» чисел длиной `2n`. Для того чтобы определить является ли число «счастливым», нужно сложить первые `n (n 6)` цифр, в полученном...
laskinarik41
25.01.2021 21:02
Бейнені өңдеуге қандай қызмет түрлері жатады?...
danil3331116
25.01.2021 20:59
О АдамзаттыңроботтехникасаласындағыжетістіктеріЗерттеу сұрақтары мен бағыттарыҚазіргі роботтехниканың дамуы.Робот жасаудың қарқынды дамуы.Роботтехника саласындағы соңғы...
Olenizbugushego
25.01.2021 20:56
Үй тапсырмасы Мобильді қосымшаңда, қолданушыға қажетті әрекеттер мен енгізілгенбайланысты шектеулер туралы хабарламалар дайында....
юра417
25.01.2021 20:54
Если у — вещественная переменная, ап — целая, то какие из следу- ющих операторов присваивания правильные, неправильные исправить ошибки а) у: =n+1 правильноеб) n:=y-1в)...
anyadorr
25.01.2021 20:51
Изучить параграф 3.2-3.3 решить задачи: 1. Цветное растровое изображение с палитрой из 256 цветов имеет размер 128 * 120 точек. Какой информационный объём (в Кбайтах)...
Популярные вопросы
Найдите пересечение промежутков [−3;8)и [3;+∞)...
3
Выпишите только подчинительные словосочетания. Укажите в них вид подчинительной...
1
Твір Біля пам’ятника святому Володимиру...
1
3. Вставьте пропущенные буквы и знаки препинания. Выполните морфологический...
1
КТО ДЕЛАЛ ))ОЧЕНЬ БУДУ БЛАГОДАРЕН ...
3
За яку якість О. Генріх назвав Деллу і Джима волхами?...
3
Какое число надо вписать в окошко чтобы равенство стало верным?...
1
Change these sentences to the passive form...
1
Подберите слова (1-5) к словосочетаниям: a bottle of ... a carton of...
1
6. Поставити в реченнях відповідні роз-ділові знаки.Тут все моє і луг...
3
begin
for a:=1 to 4999 do
begin
if (a mod 39=0) then b:=a;
end;
writeln(b);
end.
ответ:Число 4992