Написать таблицу перевода расстояний из дюйма в сантиметр для значений от 1 до 10 дюймов с шагом 1.

Var i:integer;
begin
writeln('Дюймы   См');
for i:=1 to 10 do
 writeln(i:3,'   ',2.54*i:5:2);
end.

Результат:
Дюймы   См
  1    2.54
  2    5.08
  3    7.62
  4   10.16
  5   12.70
  6   15.24
  7   17.78
  8   20.32
  9   22.86
 10   25.40