НачалоВвод:xZ=8*xZ=кореньZZ=z-1Y=3*xY=y/zВывод:yКонецСделать в паскале

13
категория: Знания, Информатика
1 ответ:
0

var x, y, z: real;

begin

   readln(x);

   z:= 8 * x;

   z:= sqrt(z);

   z:= z - 1;

   y:= 3 * x;

   y:= y / z;

   writeln(y)

end.