Напечатать таблицу соответствия между весом в фунтах и весом в кг для значений от 1 до 10 фунтов с шагом 0,5 фунта. Формула перевода: 1 фунт = 400 г. Составить программу и блок-схему

Блок-схема - в прилагаемом файле.// PascalABC.NET 3.3begin  writeln('Фунты   кг');  var x:=Range(10,100,5).Select(p->p/10);  x.Foreach(p->Writeln(p:4:1,p*400/1000:8:3));end.Результат:Фунты   кг 1.0   0.400 1.5   0.600 2.0   0.800 2.5   1.000... 9.0   3.600 9.5   3.80010.0   4.000