Question

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

Answer 1

var i:integer;
begin
  for i := 25 to 35 do
    writeln(i, ' ', i + 0.5, ' ', i - 0.2);
end.