Помогите пожалуйста решить, даже заплачу тому кто решит. Только пожалуйста, решит?

Помогите пожалуйста решить, даже заплачу тому кто решит. Только пожалуйста, решит??…
Гость
Ответ(ы) на вопрос:
Гость
Program n1; var x,y:real; begin writeln('введите x '); readln(x); y:=(abs(sqr(x)+3*x)-4)/(sqrt(sqr(x)-5)); writeln('ответ : ',y); end.   program n2; var s1,s2,V,a:real; begin writeln('введите длину ребра куба '); readln(a); s1:=a*a; writeln('площадь грани = ',s1); s2:=(a*a)*6; writeln('площадь полной поверхности = ',s2); V:=a*a*a; writeln('объём куба = ',V); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы