Информатика 9 класс помогите пожалуйста
Var a[1..10]: array of integer; i:integer; Begin i:=1; while i<=10 begin<br>read(a[i]); i:=i+1; end; End.
спасибо