Pascal ABC построить таблицу соответствий между мерами

[RikOzz]

построить таблицу соответствий между мерами.Начальное значение мер, шаг изменения этого значения и количество строк, в таблице (10-15) задать самостоятельно в режиме диалога. 1 унция = 28.353495 г = 142 карат

[ZX Spectrum-128]

// это ввод начальных значений
readln(nachznach);
Readln(shag);
Readln(kolvostrok);

For i:=1 to kolvostrok do
  Begin
    // изменение значений
    ...
    // вывод данных
    Write(...);
  End;

Как-то так. Общая схема