Question

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

Answer 1

это же слишком элементарно, чтобы самому не сделать...
var x:real;
begin
writeln('vvedi x:');
readln(x);
writeln('y=',2*x-5/x-1);
end.

Answer 2

Var x,y : Real;
Begin
  Readln(x);
  y:=2*x-5/x-1;
  Writeln(y:8:4);
end.