Напечатать таблицу соответствия между весом в фунтах и весом в кг (1 фунт = 400г) для...

Question

Напечатать таблицу соответствия между весом в фунтах и весом в кг (1 фунт = 400г) для значений от 1 до 20 фунтов с шагом 1 фунт.

Answer 1

Program table;
var
f, i: integer;
k: real;
begin
for i := 1 to 20 do
writeln(i, ' (фунт) = ', (i * 0.4):1:3, ' (кг)');
end.

Comments

это и есть таблица?

---

да. программа выводит результат как таблицу

---

Спасибо большое!