Помогите, паскаль авс 41.а

Помогите, паскаль авс 41.а
Гость
Ответ(ы) на вопрос:
Гость
Var x,y,z:real; Begin Write('x = ');ReadLn(x); Write('y = ');ReadLn(y); Write('z = ');ReadLn(z); WriteLn('u = ',Sin(abs((y-sqrt(abs(x)))*(x-(y)/(z*z+x*x/4))))); WriteLn('v = ',Cos(z*z+x*x+4)); End.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы