Question

Кто знает хелп, тому 50баллов срочно нужно сделать

Answer 1

Program mv;

Var a,b,c,k,s,y : real;

begin

Readln(a,b,c);

s:=sqrt(a+b*b*b*b*b)/(3*c);

k:=s-(sqrt(abs(a*b*c)));

y:=s+k-(s/(b*c));

Write(y);

End.

Вроде так