1. Информатика
  2. Найти все трёхзначные числа,

Найти все трёхзначные числа, которые при увеличении на 1 делятся на 2, при увеличении на 2 делятся на 3, при увеличении на 3, при увеличении на 3 делятся на 4, а при увеличении на 4 делятся на 5.

nastyakarina112 nastyakarina112    2   02.03.2019 03:50    6

Ответы
колдун3 колдун3  23.05.2020 20:27

var

i:integer;

begin

for i:=100 to 999 do

if ((i+1) mod 2=0) and ((i+2) mod 3 =0) and ((i+3) mod 4=0) and ((i+4) mod 5 =0)

then writeln(i);

end.

 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
максим1714 максим1714  26.09.2019 21:00
Натуральное число m называется совершенным если оно равно сумме своих делителей включая 1 но исключая себя. напечатать все совершенные числа меньше заданного n....
inatalia3007 inatalia3007  26.09.2019 21:00
Ввести массив x из 25 элементов. увеличить все отрицательные элементы массива на 5 и вывести новый массив....
troll28 troll28  04.08.2019 06:10
Буду если какой добрый человек решит (хотя бы одно )! 1.какое минимальное количество бит потребуется для кодирования положительных чисел, меньших 80? 2. информационное...
Зара7878 Зара7878  07.10.2019 07:10
Сканер имеет разрешение 512 х 512 dpi. отсканированное изображение размером 8 х 4 дюйма занимает 16 мбайт памяти. чему равна глубина цвета точки (пикселя) отсканированного...
helppppme helppppme  07.10.2019 07:10
11) создать массив целых чисел из 8 элементов, заполнить массив с клавиатуры, вывести массив на экран в одну строку, вывести в следующей строке самое большое число...
Dancerebuclic2017 Dancerebuclic2017  07.10.2019 07:10
Вася увидел, что на его компьютере открыто окно текстового редактора, где набран текст: . ученик догадался, что это ему шифровка, и составил дешифрующий алгоритм...
очочов очочов  07.10.2019 07:10
Розробітьть проект розрядні одиниці у якому в тестове поле вводять чотиризначне ціле число натискаючи кнопку розкласти й у текстовому полі захищаними від змін отримання...
tatyanablok tatyanablok  07.10.2019 07:10
10) создать массив символов, вывести символы так, чтобы получилось ваше имя имя асия на языке с++ 40 !...
arturyakovlev1703 arturyakovlev1703  22.05.2019 21:04
Доставка товара на дом, заказанного в фирме «грива и хвост», стоит 700 рублей в пределах города москва. доставка за пределы горо- да стоит 700 рублей и 100 рублей...
Эва637 Эва637  22.05.2019 21:03
Excel 50 . как сделать формулу на листе 1 для клетки таблицы на листе 2? ​...

Популярные вопросы