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

Question

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

Answer 1

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