Program z17;
const n = 60;
var c: array [1..n] of integer;
k, i:integer;
Begin
randomize;
k:=0;
for i:=1 to n do
c:= random (21)-10;
if i mod 4 = 0 then
if c=0 then
k:=k+c[i];
end;
end;
end;
writeln (k);
end.

Ошибка: попытка присвоить переменной типа array [1..60] of integer выражение типа integer

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