Question

Ошибка в строке 6 не могу понять какая, помогите. Var mas: array [0..5] of integer; i: integer; Begin for i:=0 to 7 do mas[i] := i; for i:=0 to 7 do writeln (mas[i]); End.

Answer 1

Const
    n = 5;

var
    mas: array [0..n] of integer;
    i: integer;

begin
    for i := 0 to n do
    begin
        mas[i] := i;
        writeln(mas[i]);
    end;
end.

Ошибка в размерности массива или в пределах цикла, потому чтоб не ошибаться на будущее используйте константу

Answer 2

Ошибка в строке 6 возникает из-за выхода за границы массива `mas`. В данном случае, массив `mas` объявлен как `array [0..5] of integer`, что означает, что он содержит 6 элементов с индексами от 0 до 5. Однако, в цикле `for i:=0 to 7` происходит попытка обратиться к элементу массива с индексом 7, что приводит к ошибке.

Чтобы исправить эту ошибку, вам необходимо изменить границы цикла `for i:=0 to 7` так, чтобы они не выходили за пределы массива `mas`. В данном случае, вы можете изменить границы на `for i:=0 to 5`, чтобы обращаться только к элементам массива, которые существуют.

Вот исправленный код:

var
  mas: array [0..5] of integer;
  i: integer;
begin
  for i := 0 to 5 do
    mas[i] := i;
  
  for i := 0 to 5 do
    writeln(mas[i]);
end.

Теперь циклы корректно обращаются к элементам массива `mas` и выводят их значения.