Выразить в паскалях значения давления: 760 мм рт., 380 мм рт., 190 мм рт.

Предыдущий
вопрос Следующий
вопрос

program PressureValues;

var
pressure1, pressure2, pressure3: real;

begin
pressure1 := 760;
pressure2 := 380;
pressure3 := 190;

writeln('Pressure 1: ', pressure1, ' mm Hg');
writeln('Pressure 2: ', pressure2, ' mm Hg');
writeln('Pressure 3: ', pressure3, ' mm Hg');

end.