Напишите на языке Паскаль программу вычисления y по формуле: y=2x-5/x-1, где x - данное целое число.

Составим программу вычисления значения функции y по формуле y=2x-5/x-1 (x - данное целое число) на языке программирования Pascal ABC. Введем обозначения следующих величин: пусть y – значение функции, которую надо найти, а х – заданное число. Число х будем вводить с клавиатуры во время выполнения программы, используя команду readln.  

program zadacha1;

uses crt;

var x:integer; y:real;

begin

writeln (\'vvedite znachenie chisla x:\');

readln(x); {Ввод значения числа х}

y:=2*x-5/x-1 ; {Вычисление значения функции у}

writeln (\'y=\',y); {Вывод результата вычисления значения функции у на экран}

end.