program pressure;
varpressure: real;
beginpressure := 50; // давление в мН/см2writeln('Давление в Паскалях: ', pressure * 100, ' Па');end.
program pressure;
var
pressure: real;
begin
pressure := 50; // давление в мН/см2
writeln('Давление в Паскалях: ', pressure * 100, ' Па');
end.