program main real::b,h,r,a,s,pi=3.1415926,sita,area read*,r,sita b=2*r*sin(sita/2) h=2*r*sin(sita/4) s=(pi*sita*r)/180 area=(r*s)/2 print*,h,b,s,area end