1. Заданы два числа - внешний R и внутренний r радиусы кольца. Найти площадь кольца

Question

Информатика

Ританя

3 августа, 21:24

1. Заданы два числа - внешний R и внутренний r радиусы кольца. Найти площадь кольца

+5

Ответы (1)

Знаете ответ?

Санюша · Answer 1

Var R, R1:integer;

s:real;

begin

read (R, R1) ; / / где R - внешний, а R1 - внутренний радиусы

s:=pi * (sqr (R) - sqr (R1)) ;

write ('Площадь кольца=', s) ;

end.