Question

5. Определите и выведите на экран числа от 100 до 500, которые делятся на 8 и 11 одновременно.

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1611
begin
range(100,500).Where(x->(x mod 8=0) and (x mod 11=0)).Println();
end.

Answer 2

var
  i:integer;

begin
  for i:=100 to 500 do
    if i mod 88 = 0 then Write(i,' ')
end.

Результат
176 264 352 440

Answer 3

Та задача под номером 4. Эта под номером 5. Значит это разные задания.

Answer 4

Cgfcb,j

Answer 5

Спасибо

Answer 6

Пожалуйста

Answer 7

Ясно что разные, множители другие.