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.

Answer 1

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

Answer 2

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