Question

Выведи на экран все двузначные числа от 10 до 30, кратные 3, используя цикл со счетчиком /strong

Answer 1

Ответ:

var

   i:integer;

begin

 for i := 10 to 30 do

   if i mod 3 = 0 then

     writeln(i);

end.