матрицы (Pascal).

[9_Hey4]

Тут возникла такая история, после прохождения курса "матрицы" на языке программирования паскаль, я застрял на задачах типа: найти количество парных, непарных элементов... найти сумму непарных элементов... короче матрицы поглотили меня полностью. Рыская по интернету я не нашел примеры решения подобных примеров. Прошу вас о помощи (ткнуть ссылку на такие темы, написать просто пример который прийдёт вам на мысль).
P.S я просто не знаю куда уже обратится и по этому в печали....
Если у вас нет таких людей которые смогут объяснить без платно студенту-нищеброду, тогда извините за лишний топик.

[Stilet]

А что значит парных непарных? Рядомстоящих с одинаковым значением? Тогда так:

for i:=начало+1 to конец do begin
 if массив[i]=массив[i-1] then begin
  {найти количество парных}
  inc(Колво парных)
 end else begin
  {найти количество непарных}
  inc(Колво непарных)
  
  {найти сумму непарных}
  sum:=sum+массив[i]
  if i=начало+1 then sum:=sum+массив[i-1];
 end;
end;

Идея понятна?

[9_Hey4]

Сообщение от Stilet

А что значит парных непарных? Рядомстоящих с одинаковым значением?

да я в простых типа: найти кол-во парных элементов=) вот незнаю вроде как говорят это просто, но не для меня.... незнаю почему, нужно углублённо учить, вот и пытаюсь.

Я бы конечно мог написать тупо задачу, с просьбой решите её, но толку будет только -1

[Stilet]

но толку будет только -1

Ты прав )

но не для меня

Выбери другую профессию.

[9_Hey4]

Сообщение от Stilet

Выбери другую профессию.

дело не в профессии, а в теме матрицы)
можно будет скинуть Вам на проверку простенькую задачку по циклам?
если будет положено больше мук и страданий на данную профессию, пожее она будет легче и приятнее, тем более целеустремлённость очень хорошая черта!

[Stilet]

можно будет скинуть Вам на проверку простенькую задачку по циклам?

А зачем? У меня есть задача поинтереснее - интерпретатор для WEB сервиса.

[9_Hey4]

Сообщение от Stilet

А зачем? У меня есть задача поинтереснее - интерпретатор для WEB сервиса.

ладно пойду долбить знакомых, и брата двоюродного пускай учат
Можете удалять тему, всё равно толку от неё никому не будет.

можно ли сделать так чтобы я не вводил каждый элемент, а он увеличивался самостоятельно, ну на пример на 1 в этом коде:

Program Pr1;
var A: array [1..24] of integer;
    i,min : integer;
begin
for i:= 1 to 24 do
begin
write('input A[',i,']=');
readln(A[i]);
end;
min:=A[1];
for i:=2 to 24 do
if A[i]<min
then A[i]:=min;
writeln('min=',min);
readln;
end.

[Stilet]

for i:= 1 to 24 do
begin
write('input A[',i,']=');
a[i]:=i;
или a[i]:=random(100) тогда будет вносится случайное число до 100
end;

[9_Hey4]

Сообщение от Stilet

for i:= 1 to 24 do
begin
write('input A[',i,']=');
a[i]:=i;
или a[i]:=random(100) тогда будет вносится случайное число до 100
end;

спасибо огромное, я вроде начинаю разчихлятся)
но только его куда запихнуть? в место 2го либо 3тим вносить?

[Stilet]

Не понял вопроса... Что значит куда запихнуть?