1)
var c,a,b: real;
begin
readln (a);
readln (b);
c:=(a*a+b*b)*(a*a+b*b);
writeln (c);
end.
2)
var c,s,p: real;
begin
readln (s);
readln (p);
c:=s+p*p;
writeln (c);
end.
3)
var c,x,y: real;
begin
readln (x);
readln (y);
c:=x+y/2;
writeln (c);
end.
4)
var c,x: real;
begin
readln (a);
c:=15*x+3,5;
writeln (c);
end.