Представлена программа:Vara : array [1..100] of integer;i : integer;Beginread (a);for i:=1 to 100 dowriteln (a[i]);End.Содержит ли программа ошибку? Если да, то опишите эту ошибку и что в программе нужно изменить.
Представлена программа:
Var
a : array [1..100] of integer;
i : integer;
Begin
read (a);
for i:=1 to 100 do
writeln (a[i]);
End.
Содержит ли программа ошибку? Если да, то опишите эту ошибку и что в программе нужно изменить.
Ответ(ы) на вопрос:
Var a: array [1..100] of integer;
i: integer;
Begin
for i := 1 to 100 do read(a[i]);
for i:=1 to 100 do writeln (a[i]);
End.
Массив нужно заполнять в цикле, поэлементно :)
Не нашли ответ?
Похожие вопросы