var
x,y:real;
begin
readln(x,y);
if (y <= 7) and (y<>x*x) and (sqrt(sqr(x)+sqr(y))<=7) then
writeln("принадлежит")
else
writeln("не принадлежит");
readln;
end.
Если не ошибаюсь. А могу.
1<span> это правовой инструмент, определяющий использование и распространение по</span>, защищённого авторским правом
2<span>свободно распространяемое п</span>о<span>, с возмездным (или возмездным при определенных условиях) использованием.
3</span>свободный софт<span> —по</span><span>, пользователи которого имеют права («свободы») на его неограниченную установку, запуск, а также свободное использование, изучение, распространение и изменение (совершенствование), и распространение копий и результатов изменения</span>
1. файл, фонограф
2. береста
3. хранения
4. долговременной
5. оперативная
6. информация
7. фотография
8. камень
9. папирус
10. Китай
11. пергамент
1.основал корпорацию Microsoft
2.В 1989 основал мультимедийную компанию Corbis
больше не знаю извините
1 y <> 0
x mod 7 <> 0
(x >-5) AND (x<10)
(x>=-1)AND(x<=1)