- 06.12.2015 20:37
- Информатика
- remove_red_eye 11277
- thumb_up 34
Ответы и объяснения 1
Язык Паскаль
var x, y:integer
begin
readln (x, y);
if ( x>=0 ) and (x*x+y*y <=100) then
writeln ("Принадлежит")
else writeln ("Не принадлежит");
end.
- 07.12.2015 06:27
- thumb_up 45
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.