Найдите ошибки плиз; очень надо Program mass; Uses crt; Var b:array [1..10] of integer;...

Question

Найдите ошибки плиз; очень надо
Program mass;
Uses crt;
Var b:array [1..10] of integer;
i: real;
Begin
Clrscr;
Randomize;
For i:=1 to 10 do
Begin
B:=1+random (10);
Write (‘b[‘:3, i,’]=‘, b[i]);
End;
Readkey;
End.

Comments

На восьмой строчке перед i ожидался порядковый тип, как это исправить?

Answer 1

Не ту вроде бы, да все правильно

Comments

Там на 8 строчке перед i ожидался порядковый тип, как это понять?