Напишите программу в паскале, "перевод пудов в килограммы"? ?

Program n1;
var a: real;
begin
write('введите кол-во пудов: ');
readln(a);
writeln('это ',a*16.38:6:2,' килограмм');
end.

// PascalABC.NET 3.2, сборка 1383 от 09.02.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('Килограмм: ',16.3804964*ReadReal('Пудов:'):0:3)
end.

Пример:
Пудов: 4.5
Килограмм: 73.712