оставьте программу нахождения площади кольца заключенного между двумя окружностями с радиусами r1 и r2, если r1> r2.

S = π(R₁²-R₂²)

// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (r1,r2):=ReadReal2('Радиусы наружной и внутренней окружностей:');
  Writeln('S=',Pi*(r1*r1-r2*r2):0:5)
end.

Пример
Радиусы наружной и внутренней окружностей: 10.6 6.18
S=233.00439