program pascals;

var
pressure1, pressure2: real;

begin
pressure1 := 1; // давление в 1 мм.рт.ст
pressure2 := 750; // давление в 750 мм.рт.ст

writeln('Давление в паскалях:', pressure1 133.322, ' Па');
writeln('Давление в паскалях:', pressure2 133.322, ' Па');
end.