Question

построить блок схему для нахождения функции y=5+x

Answer 1

Program z1;
Var
x,y:integer;
begin
writeln('Введите значение X');
readln(x);
y:=5+x;
writeln('Значение Y = ', y);
end.