Ответы
Ответ дал:
1
1) (Где полукруг)
var
x, y:integer;
begin
readln(x, y);
if (x>=0) AND (x*x + y*y >= 9) AND (x*x + y*y <= 25) then
writeln('(',x,';',y,') - принадлежат заданной области')
else
writeln('(',x,';',y,') - не принадлежат заданной области')
end.
var
x, y:integer;
begin
readln(x, y);
if (x>=0) AND (x*x + y*y >= 9) AND (x*x + y*y <= 25) then
writeln('(',x,';',y,') - принадлежат заданной области')
else
writeln('(',x,';',y,') - не принадлежат заданной области')
end.
Вас заинтересует
10 месяцев назад
1 год назад
6 лет назад
7 лет назад