Pliiiisпомогите срочно... напишите пожалуйста программу в паскале..по а1, б1

Question

Pliiiis
помогите срочно...
напишите пожалуйста программу в паскале..по а1, б1

---

Answer 1

Program UVA;
 var a,b,x,y,z:real;
begin
 read (a,b);
 x:=(a*a)/(b+1);
 y:=(a*a*x*x)/b;
 z:=sqrt(x+1)+sqrt(2*y);
 read (z);
end.

Comments

потом сам значения z посчитай