Составить вычисления значения функции y=1/x-3. Осуществить вывод значений вводимых исходных данных и результат вычисления функции. Программа PascalABC.NET

Объяснение:

Код:

program znan;

var x,y:real;

begin

 write('Введите значение x: ');readln(x);

 y:=1/(x-3);

 writeln('Вы ввели: ',x);

 writeln('Пример: ','y/',x,'-3');

 writeln('ответ: ',y);

end.

Если x=4 то выводится следующее:

Введите значение x: 4

Вы ввели: 4

Пример: 1/4-3

ответ: 1