Question

Даны два круга с общим центром и радиусом R1>R2. Вычислить площадь кольца. Помогите пожалуйста. Я вас отблагодарю.

Answer 1

var R1, R2, s1, s2, s:real;
begin
   read (R1, R2);
   s1:=3.14*R1*R1;
   s2:=3.14*R2*R2;
   s:=s1-s2;
   writeln (s:0:3);
end.

Answer 2

с точностью до 3 знаков после запятой

Answer 3

а так что ли writeln ('s=',s);