Question

Pascal
Вывести на экран целые числа от 21 до 35, которые НЕ делятся на 7, каждое на отдельной строке

Answer 1

var i : integer;

begin

for i := 21 to 35 do

if i mod 7 <> 0 then

writeln(i);

end.