ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Напечатать таблицу соответствия между весом в фунтах и весом в килограммах 1, 2, ..., 10 фунтов (1 фунт= 453 гр.) в Pascal. ABC Обязательно должна выводиться таблица.

Сейчас попробую.

Все работает, благодарю.

Как баллы дать?

var i: integer;beginfor i:=1 to 10 dowriteln (i:2,' фунт (-а,-ов) равно ',i*453/1000:0:3,' килограмма')end.илиvar i: integer;beginwriteln ('Фунты     Килограммы');for i:=1 to 10 dowriteln (i:3,i*453/1000:15:3)end.