составить программу ввода с клавиатуры элементов массива А (1 ... 10) и вывода элементов массива в столбец

Question

Информатика

Зенона

16 марта, 03:15

составить программу ввода с клавиатуры элементов массива А (1 ... 10) и вывода элементов массива в столбец

+4

Ответы (1)

Знаете ответ на вопрос?

Лексаня · Answer 1

Program Program1;

Var

a:array [1 ... 10] of integer;

i:integer;

begin

for i:=1 to 10 do

begin

write ('Введите ', i,' элемент массива: ') ;

readln (a[i]) ;

end;

for i:=1 to 10 do

writeln ('a[', i,']=', a[i]) ;

end.