Вывести «столбиком» следующие числа: 2,2; 2,4; 2,6,…,4,0; 4,2. — Pascal(Паскаль)

var
 i:integer;
begin

 i:=20;
 while i<=42 do
  begin
   writeln(i/10:0:1);
   i:=i+2;
  end;
end.