Помогите с Информатикой (Программирование на языке PascalABC.net).Нужно создать программу ...
Вычислите площадь кольца
Введите исходные данные
Радиус кольца ->3.5
Радиус отверстия (см)->7
Ошибка! Радиус отверстия не может быть-Кольца
S=PR^2

// PascalABC.NET 3.2, сборка 1336 от 14.11.2016begin  Writeln('Вычислите площадь кольца');  Writeln('Введите исходные данные');  var r1:=ReadReal('Радиус кольца (см)->');  var r2:=ReadReal('Радиус отверстия (см)->');  if r2>=r1 then    Writeln('Ошибка! Радиус отверстия не может превышать радиус кольца')  else    Writeln('Площадь кольца составляет ',pi*(r1*r1-r2*r2):0:4, ' кв.см')end.