Пожалуйста помогите! Надо срочно сделать задачки, а я в Паскале не особо.

1) Напечатать числа следующим образом:
21 20.4
22 21.4
23 22.4
так до 35 34.4
Пожалуйста буду оч благодарен!!!

СПАСИБО!!!!

Bokul, ну как-то не по научному !))

var
  x: Integer;
begin
  for x := 21 to 35 do
   writeln(x, ' ', (x - 0.6):2:1);
end.