Question

Написать программу нахождения функции у=(х+5)/(х-7)
На языке паскаль
Как в компьютере вводим типо programm tt;
И т.п, прошу
И блок схему если есть возможность прикрепить
Даю 50 баллов
Заранее спасибо!

Answer 1

program restless;

var

y, x : real;

begin

readln(x);

if x <> 7 then

   begin

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

   writeln(y:5:2);

   end

else

   writeln('Возникло деление на 0!');

end.