Задание:
Составить программу ввода с клавиатуры элементов массива А (1… 10) и вывода элементов массива встолбец
Решение:
Program Program1; Vara: array [1… 10] of integer; i: integer; beginfor i: =1 to 10 dobeginwrite ('Введите ',i,' элемент массива: '); readln (a[i]); end; for i: =1 to 10 dowriteln ('a[',i,']=',a[i]); end.
Знаете другой ответ?