Цитата:
|
Обращение a[i] к двумерному массиву (матрице) неверно, надо использовать a[i,j]
|
В последнем вопросе я имел ввиду не двумерный массив, а простой тоесть не такого типа a:array [1..4,1..5], а такого [1..20]
Почему в ниже приведённом коде не прога не показывает кол-во нечётных чисел?
Код:
VAR
a: array[1..20] of Integer;
i,Count: Integer;
BEGIN
Randomize;
for i := 1 to 20 do
a[i] := Random(255)+1;
Count := 0;
for i := 1 to 20 do
if (a[i] mod 2) <> 0 then
begin
Inc(Count);
Write(a[i],' ');
end;
WriteLn;
WriteLn('Найдено ',Count,' нечетных чисел.');
ReadLn;
END.