Работа с массивами, Паскаль ABC Опции

[Тимур 2]

uses crt;
const n=20;
var
a: array[1..n] of Integer;
i: Integer;

begin

for i := 1 to n do
begin начало тоже самое будет))??

[Lapp]

Заключай код в теги. В посте #16 я подробно описал, как это делать.

начало тоже самое будет))??

ммм..

Короче, вот, смотри, как будет в результате:

const
  n=20;
var
  a: array [1..n] of integer;
  i: integer;

begin
  For i:=1 to n do a[i]= i mod 2;
  for i:=1 to n do write(a[i],' ');
end.

Но в этом коде есть одна ошибка: пропущен один символ. Исправь, и все будет нормально.

[Гость]

я первый раз вижу yes: boolean;

Логику Джоржа Буля раньше проходят чем массивы! Незнание объявления переменных этого типа... Как бы ты писал это, если бы у тебя нета не было бы?