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.