5. Определите и выведите на экран числа от 100 до 500, которые делятся на 8 и 11 одновременно.
Ответы на вопрос
Ответил AnonimusPro
0
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
range(100,500).Where(x->(x mod 8=0) and (x mod 11=0)).Println();
end.
//Версия 3.3, сборка 1611
begin
range(100,500).Where(x->(x mod 8=0) and (x mod 11=0)).Println();
end.
Ответил Аноним
0
var
i:integer;
begin
for i:=100 to 500 do
if i mod 88 = 0 then Write(i,' ')
end.
Результат
176 264 352 440
i:integer;
begin
for i:=100 to 500 do
if i mod 88 = 0 then Write(i,' ')
end.
Результат
176 264 352 440
Ответил AnonimusPro
0
Та задача под номером 4. Эта под номером 5. Значит это разные задания.
Ответил Egorxxx
0
Cgfcb,j
Ответил Egorxxx
0
Спасибо
Ответил Аноним
0
Пожалуйста
Ответил Аноним
0
Ясно что разные, множители другие.
Новые вопросы