Question

Составить программу для блок-схеме приведенной ниже

Answer 1

Ответ:

program pr;

var x,y: real;

begin

readln (x);

if x-3<>0 then

begin

y:=(x+5)/(x-3);

writeln(y);

end

else writeln('Решений нет')

end.