- 07.11.2017 03:19
- Информатика
- remove_red_eye 6672
- thumb_up 19
Ответы и объяснения 1
program p;
var
r1,r2:integer;
pi,s:real;
begin
pi:=3,1428l
readln(r1,r2)
if r1>r2 then
s=pi*r1*r1-pi*r2*r2
else
s=pi*r2*r2-pi*r1*r1
writeln(s);
end.
- 08.11.2017 15:10
- thumb_up 4
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.