Составить программу перевода величины силы: фунт-сила в ньютоны от 30 до 300 фунт-сила с шагом 30. 1 фунт-сила = 4.448 н- Pascal(Паскаль)

var
i:integer;
BEGIN
writeln('Программа перевода величины фунт-сила в ньютоны');
i:=30;
repeat
writeln(i,' фунт-сила = ',i*4.448:7:3,' н');
i:=i+30;
until i>300;
readln;
END.