Вывести ** экран все четные числа от 3 до 35 . в Паскаль

Question

Вывести на экран все четные числа от 3 до 35 . в Паскаль

Answer 1

Var i : Byte;
Begin
  For i:=1 to 16 do Write(i*2+2,' ');
end.