Дана сторона в, правильного семиугольника. Составить программу для нахождения радиуса вписанной окружности r, и площади семиугольника S, по формулам:  r=b/2 (1+sqr2) и s=8*r^2*sqr3-2sqr2

var r,s,b:real; begin readln (b);r:=b/2*(1+sqr(2));s:=8*sqr(r)*sqr(3)-(sqr(2)*2);writeln (r);writeln(s);end.