var a,b,c,P,S: real; begin write('a = '); readln(a); write('b = '); readln(b); P:=(a+b)*2; S:=a*b; c:=Sqrt(a*a+b*b); write('периметр: P = ',P:1:2, ', площадь: S = ',S:1:2, ', диагональ: c = ',c:1:2); readln; end.