Hаписать программу табуляции функции у=1/х ** отрезке [-2,2] с шагом 1 ** языке...

Question

Hаписать программу табуляции функции у=1/х на отрезке [-2,2] с шагом 1 на языке Паскаль.Предусмотреть проверку принадлежности аргумента области определения функции.

Answer 1

Вот программа:
var x,h:real;
begin
h:=1;
x:=-2;
writeln(' x     y');
while x<=2 do<br> begin
 write(x:3);
 if x<>0 then writeln(1/x:7:2) else writeln('  функция не определена');
 x:=x+h;
 end;
end.