Составьте программу, выводящую на экран в первую строку четные числа в диапазо не от 1 до 20 через пробел, а во вторую строку нечетные числа в диапазоне от 20 до 30.

// PascalABC.NET 3.2, сборка 1341 от 20.11.2016
begin
  Range(2,20,2).Println;
  Range(21,30,2).Println
end.

Результат
2 4 6 8 10 12 14 16 18 20
21 23 25 27 29