Var A: array [1..34] of integer;
i :integer;
beginfor i:=1 to 34 do begin
writeln(введите число);
readln(A[i]);
end;
for i:=1 to 34 do write(a[i], );
end.
Оного только понять немогу. чего это ваш преподаватель всего 34 символа в массив решил забить ( числа вводит пользователь). может сразу пару-тройку тысяч, чтоб на пару уроков хватило забивать.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.