profile
Опубликовано 4 года назад по предмету Информатика от archery

Turbo Pascal. Принадлежит ли точка заданной области

  1. Ответ
    Ответ дан vladmor
    var
      x, y: integer;

    begin
      write('Координаты точки x,y ');
      readln(x, y);
      if ((sqr(x) + sqr(y)) <= 4) and ((sqr(x) + sqr(y)) >= 1)
        then writeln('Принадлежит')
      else
        writeln('Не принадлежит');
    end.

    Тест №1
    Координаты точки x,y -1 1
    Принадлежит

    Тест №2
    Координаты точки x,y -3 3
    Не принадлежит