Website and domain for sale: mail@discussmain.com

Please count, pascal avs 41.a

99
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.
56
Answer add