program pascals;
vapressure1, pressure2: real;
begipressure1 := 1; // давление в 1 мм.рт.сpressure2 := 750; // давление в 750 мм.рт.ст
writeln('Давление в паскалях:', pressure1 133.322, ' Па')writeln('Давление в паскалях:', pressure2 133.322, ' Па')end.
program pascals;
va
pressure1, pressure2: real;
begi
pressure1 := 1; // давление в 1 мм.рт.с
pressure2 := 750; // давление в 750 мм.рт.ст
writeln('Давление в паскалях:', pressure1 133.322, ' Па')
writeln('Давление в паскалях:', pressure2 133.322, ' Па')
end.