Задача 1 урок 15
Primary tabs
Задача 1 урок 15
Задайте в коде программы массив из чисел семи чисел:
1 12 45 6 7 18 99
Затем обойдите это массив, выводя его значения на экран.
var a: array [1..7] of integer; i: integer; begin a[1] := 1; a[2] := 12; a[3] := 45; a[4] := 6; a[5] := 7; a[6] := 18; a[7] := 99; for i:=low(a) to high(a) do writeln(a[i]); readln(); end.
- Log in to post comments
- 630 reads