Вариант I 1. Начертить получившийся массив и обозначить его индексы For i:=-5 to 3 do A[i]:=i+6; 2. Начертить получившийся массив и обозначить его индексы K:=5; For i:=-5 to 3 do begin A[i]:=i+6+k; K:=k-1 End; | Вариант II 1. Начертить получившийся массив и обозначить его индексы For i:=-10 to -1 do A[i]:=i+16; 2. Начертить получившийся массив и обозначить его индексы K:=1; For i:=-10 to -1 do begin A[i]:=i+16-k; K:=k+3 End; | Вариант III 1. Начертить получившийся массив и обозначить его индексы For i:=0 to 8 do A[i]:=2*i-2; 2. Начертить получившийся массив и обозначить его индексы K:=-5; For i:=0 to 8 do begin A[i]:=2*i-2*k; K:=k+2 End; |
Вариант IV 1. Начертить получившийся массив и обозначить его индексы For i:=3 to 11 do A[i]:=3*i-1; 2. Начертить получившийся массив и обозначить его индексы K:=0; For i:=3 to 11 do begin A[i]:=3*i-1-k; K:=k+4 End; | Вариант V 1. Начертить получившийся массив и обозначить его индексы For i:=100 to 107 do A[i]:=i-101; 2. Начертить получившийся массив и обозначить его индексы K:=-1; For i:=100 to 107 do begin A[i]:=i-101+k; K:=k-10 End; | Вариант VI 1. Начертить получившийся массив и обозначить его индексы For i:=12 downto 3 do A[i]:=2-I; 2. Начертить получившийся массив и обозначить его индексы K:=10; For i:=12 downto 3 do begin A[i]:=2-I+k; K:=k+3; End; |
Вариант VII 1. Начертить получившийся массив и обозначить его индексы For i:=3 to 9 do A[i]:=1-I; 2. Начертить получившийся массив и обозначить его индексы K:=-3; For i:=3 to 9 do begin A[i]:=1-I-k; K:=k-2 End; | Вариант VIII 1. Начертить получившийся массив и обозначить его индексы For i:=21 to 28 do A[i]:=I; 2. Начертить получившийся массив и обозначить его индексы K:=-1; For i:=21 to 28 do begin A[i]:=I-k; K:=k-4 End; | Вариант IX 1. Начертить получившийся массив и обозначить его индексы For i:=7 to 15 do A[i]:=-I; 2. Начертить получившийся массив и обозначить его индексы K:=2; For i:=7 to 15 do begin A[i]:=-I+k; K:=k-4 End; |
Вариант X 1. Начертить получившийся массив и обозначить его индексы For i:=-10 to -3 do A[i]:=2*I; 2. Начертить получившийся массив и обозначить его индексы K:=1; For i:=-10 to -3 do begin A[i]:=2*I+k; K:=k*2 End; | Вариант XI 1. Начертить получившийся массив и обозначить его индексы For i:=-1 downto -7 do A[i]:=-i+1; 2. Начертить получившийся массив и обозначить его индексы K:=1; For i:=-1 downto -7 do begin A[i]:=-i+1+k; K:=2*k End; | Вариант XII 1. Начертить получившийся массив и обозначить его индексы For i:=-4 to 4 do A[i]:=2+I; 2. Начертить получившийся массив и обозначить его индексы K:=2; For i:=-4 to 4 do begin A[i]:=2+I-k; K:=k+5 End; |
Вариант XIII 1. Начертить получившийся массив и обозначить его индексы For i:=9 to 16 do A[i]:=9-2*I; 2. Начертить получившийся массив и обозначить его индексы K:=-10; For i:=9 to 16 do begin A[i]:=9-2*I-k; K:=k-1 End; | Вариант XIV 1. Начертить получившийся массив и обозначить его индексы For i:=-20 to -14 do A[i]:=21+2*I; 2. Начертить получившийся массив и обозначить его индексы K:=20; For i:=-20 to -14 do begin A[i]:=21+2*I+k; K:=k+1 End; | Вариант XV 1. Начертить получившийся массив и обозначить его индексы For i:=-7 to 0 do A[i]:=3*i-5; 2. Начертить получившийся массив и обозначить его индексы K:=2; For i:=-7 to 0 do begin A[i]:=3*i-5+k; K:=k+2 End; |
Нахождение максимума и минимума в массиве
1. Найти в массиве количество максимальных элементов
2. Найти индексы первого и последнего минимального элементов
3. В массиве хранится информация об осадках июля. Найти дату самого дождливого дня
14. Практически выполнить следующие пункты в одной программе (ничего не удаляя и запуская её после выполнения каждого пункта, начиная с пункта 4)
1. Описать массив из 15 элементов
2. Заполнить весь массив случайным образом из диапазона [10;15]
3. Вывести на экран массив в строку, отводя под каждый элемент 4 позиции
4. Добавить команду writeln (зачем?)
5. Вывести в строку индексы элементов, отводя под элементы по 4 позиции
6. Добавить команду writeln (зачем?)
7. Найти минимальный элемент и его номер и вывести их на экран (что не совсем так?)
8. Вывести на экран номера минимальных элементов
9. Вывести на экран количество минимальных элементов