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