Построить блок схему для нахождения функции y=5+x
Program z1; Var x,y:integer; begin writeln('Введите значение X'); readln(x); y:=5+x; writeln('Значение Y = ', y); end.