Шумахер
Мыслитель
(8046)
17 лет назад
var
i: integer;
K: array [0..3] of integer;//Массив с инфой о количестве точек в квадранте
const
M = 15;//размер массива
begin
for i := 0 to 3 do
K [ i ] := 0;
for i := 0 to M - 1 do begin
if (X [ i ] > 0) and (Y [ i ] > 0) then
inc(K[1-1]);
if (X [ i ] < 0) and (Y [ i ] > 0) then
inc(K[2-1]);
if (X [ i ] < 0) and (Y [ i < 0) then
inc(K[3-1]);
if (X [ i ] > 0) and (Y [ i ] < 0) then
inc(K[4-1]);
end;
Коротеев Александр
Высший разум
(112972)
17 лет назад
I квадрант - это при x>0, y>0
II - x<0, y>0
III - x<0, y<0
IV - x>0, y<0
Короче - по букве С, если именно в этом вопрос.
А вот куда относятся оси и начало координат не знаю (((( - лучше уточни у заказчика/преподавателя
При заданных массивах X(15), абсцисс Y(15), ординат точек плоскости XoY, определить сколько из них находится в 1,2,3,4 квадратах(четвертях) плоскости.