заданы три точки с координатами A(x1y1),B(x2,y2), C(x1,y1) и круг с центром в начале координат и радиусом R. определить сколько точек принадлежат кругу pasca
Var x1,y1,x2,y2,x3,y3,r,count:integer; begin read(x1,y1,x2,y2,x3,y3,r); if sqr(x1) sqr(y1)=sqr(r) then inc(count); if sqr(x2) sqr(y2)=sqr(r) then inc(count); if sqr(x3) sqr(y3)=sqr(r) then inc(count); writeln(count); end.
Пример ввода: 0 1 1 0 -1 0 1 Пример вывода: 3
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
