Напечатать числа следующим образом 25 25.5 24.8 26 26.5 25.8 . . . 35 35.5 34.8 В ПАСКАЛЕ

Question

Напечатать числа следующим образом
25 25.5 24.8
26 26.5 25.8
. . .
35 35.5 34.8
В ПАСКАЛЕ

Answer 1

// PascalABC.NET 3.1, сборка 1213 от 04.04.2016
var
  i:integer;
begin
  for i:=1 to 11 do Writeln(24+i,24.5+i:5:1,23.8+i:5:1)
end.

Результат выполнения программы:
25 25.5 24.8
26 26.5 25.8
27 27.5 26.8
28 28.5 27.8
29 29.5 28.8
30 30.5 29.8
31 31.5 30.8
32 32.5 31.8
33 33.5 32.8
34 34.5 33.8
35 35.5 34.8