Помогите найти площадь кольца, внутренний радиус которого равен r, а внешний - заданному числу R (R>r)
программа какая
Паскаль.
Площадь круга=пи*R^2 внешний круг=пи*R^2 внутренний=пи*r^2 площадь кольца= пиR^2-пиr^2= пи(R^2-r^2)
спасибо.
Var R,r:real; begin read(R.r); r:=6,28*(R*R-r*r); write(r); end.
Спасибо.
тогда уж не 6,28, а 3,14
да, прошу прощения
и не r, а вводишь еще одну величину s - площадь
лишние переменные..
Var R,r,s:real; begin read(R.r); s:=3.14*(R*R-r*r); write(s); end.
моя лучше)