В чем ошибка кода? PascalABC

Question

В чем ошибка кода? PascalABC

Yarkos ;3 Быць Ученик (98), на голосовании 1 год назад

Program PeopleCounter1;
var n,i: integer;
cosnt:
n:=30;
a: array [1..n] of integer;
begin
randomize;
for i: integer := 1 to n do
begin
a[i]:= random(150)+50;
writeln ('a[',i,']=', a[i])
end;
end.

На четвёртой строке он мне пишет: "Ожидался тип"
Если всё в одну строчку -- ничего не меняется.

Answer 1

После const двоеточие лишнее.
В секции описания констант не допускается оператор присваивания :=
Описание массива просится в секцию описания переменных var

Answer 2

Дурацкие Вопросы Профи (904) 1 год назад

const n: integer;

Answer 3

 program PeopleCounter1; 
 
const 
  n = 30; 
 
var 
  i: integer; 
  a: array [1..n] of integer; 
 
begin 
  randomize; 
  for i:=1 to n do 
  begin 
    a[i] := random(150) + 50; 
    writeln('a[', i, ']=', a[i]) 
  end; 
end.