Составить линейный алгоритм вычисления значения функции y=1/x (обязательно рассмотреть вариант x=0)

Question

Информатика

Антонка

19 октября, 06:23

Составить линейный алгоритм вычисления значения функции y=1/x (обязательно рассмотреть вариант x=0)

+3

Ответы (1)

Знаете ответ на вопрос?

Савва · Answer 1

Var x, y: real;

begin

readln (x) ;

if x = 0 then

writeln ('На ноль делить нельзя!')

else begin

y : = 1 / x;

writeln ('1/'+x+'='+y) ;

end;

end.