Question

Составить алгоритм вывода на экран всех чисел на отрезке [45;180], делящихся нацело на 8

Answer 1

Program n1;
var i: integer;
begin
for i:=45 to 180 do if(i mod 8=0) then writeln(i);
end.