Спасайте, плес. Толком ничего не объяснили, а дали карточку. Расчитываю на вашу помощь, х)
Var a,b,c,s,k,y:real; begin Read(a,b,c); s:=a+Sqrt(a+b*b*b)/c; k:=Sqr(s*s)-Sqrt(Abs(a*b*c)); y:=a*s+Sqrt(k)+s/(b*c); Writeln(y) end. Пример -7 2 9 95.1778833805713
Спасибо большое. *^*
Еще раз напишете в вопросе какой-то "плес" - по крайней мере на меня не рассчитывайте. Здесь достаточно много взрослых людей, которые привыкли к нормальному русскому языку.
А так - пожалуйста.