циклические конструкции Опции

[mygray]

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

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

[Bokul]

Код

var i:byte;
begin
for i:=21 to 35 do
    writeln(i,' ',i-1,'.4');
readln;
end.

[Гость]

СПАСИБО!!!!

[klem4]

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

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