Размещено 5 лет назад по предмету
Информатика
от minnnimaus
Подскажите что не так? Пишет ошибку:Нет индексного свойства по умолчанию для функционального типа Program chisl; var A:array[1..10]of integer; i:integer; begin for i:=1 to 10 do begin writeln['A[',i,']=']; read(A[i]); end; if A[i] mod 2 = 0 then begin write ('A[i]=',A[i]); end; end.