Question

Записать на языке Паскаля логическое выражение, которое истинно при попадании точки с координатами x и y

Answer 1

Var x,y,hyp1,hyp2:integer;
begin
read(x,y);
hyp1 := (sqrt(sqr(-2) + sqr(4));
hyp2 := (sqrt(sqr(2) + sqr(2));
if (sqrt(sqr(x) + sqr(y)) <= hyp1) or (sqrt(sqr(x) + sqr(y)) <= hyp2) then write ('Да') else write('Нет');
end.