Дано натуральное k. Напечатать таблицу перевода расстояний в дюймах в сантиметры (1 дюйм=2,54 см) для значений от 1 до k дюймов с шагом 1 — Pascal(Паскаль)

program _03;

uses Crt;

var
  i, k: integer;

begin
  write('K: ');
  readln(k);
  for i := 1 to k do
    writeln(i, ' inches is ', i * 2.54, ' cm');
  readkey;

end.