Напишите программу в паскаль, которая вычисляет площадь кольца если его толщина t см а диаметр внутреннего круга - d см
Var s,t,d:real; begin readln(t,d); s:=pi/4*(sqr(d+t*2)-sqr(d)); writeln(s); end.