Найти площадь кольца, внутренний радиус которого равен 20, а внешний -заданному числу r (r > 20). паскал
Var r,s:real;begin writeln('r=?, r>20 '); readln(r); s:=3.14159265359*(r*r-400.0); writeln('s=', s);end. -------------- Но проверку r>20 не делал, просто попросил словами.