Как написать программу в паскале по схеме?

Объяснение:

Код по блок схеме:

program xplusy;

var

x, y: real;

begin

writeln ('input x: ');

readln (x);

if x>5 then y:=x+3 else y:=x-5;

writeln('y = ',y:10:3);

end.

Блок-схема отличается от условий неравенств внизу!