Question

Напишите пожалуйста программу для вычисления Значения функции y=1/х-1.(это первый номер). И второй если можно

Answer 1

Ответ:

№1

var  

 x :integer;

begin

 readln(x);

 writeln('y =',(1)/(x-1));

end.

-----------------

№2

var  

 a,b :integer;

begin

 readln(a,b);

 writeln('',a*a-b*b);

end.

Объяснение:

Как автор просил.