ПаскальОчень срочно надо!!!Пожалуйста посчитайте пожалуйста​

var price : Real;

begin

Write('Цена за кг = '); readln(price);

writeln('1.2 кг = ', (1.2 * price):4:0);

writeln('1.4 кг = ', (1.4 * price):4:0);

writeln('2 кг = ',( 2 * price):4:0);

end.