Предмет: Информатика, автор: Ололёна1

Помогите , пожалуйста !! Написать алгоритмом и программой Паскаль

Приложения:

Ответы

Автор ответа: sellsaccount
0
var a, b:real;
begin
   read (a, b);
   writeln(pi*abs(a*a-b*b):0:10);
end.
P.S.
S_{kol}=S_1-S_2= pi R_1^2- pi R_2^2= pi *(R_1^1-R_2^2);
Автор ответа: Аноним
0
var
  r1, r2, s: real;

begin
  Write('Введите через пробел внутренний и наружный радиусы кольца: ');
  Readln(r1, r2);
  s := Pi * (sqr(r2) - sqr(r1));
  Writeln('Площадь кольца равна ', s:0:5)
end.

Тестовое решение:

Введите через пробел внутренний и наружный радиусы кольца: 3.85 7.12
Площадь кольца равна 112.69490





Приложения:
Похожие вопросы
Предмет: Химия, автор: TechAndrew