Урок 15 Задача 2
Primary tabs
Пользователь вводит 7 чисел одно за другим, сохраните их в массив, выведите этот массив на экран.
Примечание: вывод значений массива сделайте в отдельном цикле.
Решение:
program u15z02; var i:integer; a: array [1..7] of integer; begin for i:=low(a) to high(a) do begin write('vvedite chislo - '); readln(a[i]); end; for i:=low(a) to high(a) do write(a[i],' '); readln(); end.
Консоль:
vvedite chislo - 1 vvedite chislo - 2 vvedite chislo - 3 vvedite chislo - 4 vvedite chislo - 5 vvedite chislo - 6 vvedite chislo - 7 1 2 3 4 5 6 7
- Log in to post comments
- 238 reads