- 20.11.2016 13:23
- Информатика
- remove_red_eye 7575
- thumb_up 9
Ответы и объяснения 1
Var
R,x,y: real;
t: boolean;
begin
read(R,x,y);
t := (x <= 0) and (y = -R);
t := t or (x >= 0) and (y >= 0) and (sqr(x) + sqr(y) <= sqr(R));
writeln(t)
end.
- 21.11.2016 08:45
- thumb_up 33
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.