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

var r1,r2:real;beginwrite('Радиус кольца -> ');readln(r1);write('Радиус отверстия (см)-> ');readln(r2);if r2>=r1  then writeln('Ошибка! Радиус отверстия не может быть >= радиуса кольца') else writeln('S = ',pi*(r1*r1-r2*r2):5:2);end.Пример:Радиус кольца -> 7Радиус отверстия (см)-> 3.5S = 115.45