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

Question

Информатика

Маруня

21 февраля, 14:34

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

+2

Ответы (1)

Знаете ответ?

Ларисса · Answer 1

Немножко есть криворукости: нужно присваивать не с, а с[i]

c[i]: = random (21) - 10;

А вот дальше совсем плохо.

if c=0 then - это как, весь массив равен нулю? Это в Паскале нельзя писать.