Одномерные массивы 1. создать массив из 10 элементов 2. создать массив из 11 элементов 3. заполнить массив порядковыми номерами в прямом порядке 4. заполнить массив порядковыми номерами в обратном порядке 5. заполнить массив случайными числами в [0,10] 6. заполнить массив случайными числами в [0,9] 7. заполнить массив случайными числами в [-10,10] 8. заполнить массив случайными числами в [-5,5]
1. создать массив из 10 элементов
var
a1:array [1..10] of integer;
2. создать массив из 11 элементов
var
a2:array [1..10] of integer;
3. заполнить массив порядковыми номерами в прямом порядке
var
a3:array [1..n] of integer;
i:integer;
begin
for i:=1 to n do a3[i]:=i;
4. заполнить массив порядковыми номерами в обратном порядке
var
a4:array [1..n] of integer;
i:integer;
begin
for i:=1 to n do a4[n-i+1]:=i;
5. заполнить массив случайными числами в [0,10]
var
a5:array [1..n] of integer;
i:integer;
begin
randomize;
for i:=1 to n do a5[i]:=random(11);
6. заполнить массив случайными числами в [0,9]
var
a6:array [1..n] of integer;
i:integer;
begin
randomize;
for i:=1 to n do a6[i]:=random(10);
7. заполнить массив случайными числами в [-10,10]
var
a7:array [1..n] of integer;
i:integer;
begin
randomize;
for i:=1 to n do a7[i]:=random(21)-10;
8. заполнить массив случайными числами в [-5,5]
var
a8:array [1..n] of integer;
i:integer;
begin
randomize;
for i:=1 to n do a8[i]:=random(11)-5;