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

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