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

Блок-схема - в прилагаемом файле.
// PascalABC.NET 3.3

begin
  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.800
10.0   4.000