Работа с масиви
Тъй като всички елементи на масива са от същия тип, след обработващите елементи използват циклични алгоритми. Най-често се използва параметъра цикъл. Цикълът на параметър се използва като индекс на елемент на масива. Редът на цикъла гнездене зависи от реда на масива, така че едномерен масив, използвайте един цикъл, двуизмерен - две, вложени една в друга, и така нататък.
Тъй като всеки елемент на масива има собствен сериен номер, всеки елемент може да бъде достъпен директно, като се посочва името на масива и в скоби серийния номер на елемента.
За вход или изход масив на входящите или изходящите променлива списък се поставя с индекс, както и въвеждане или извеждане отчети се изпълняват в цикъл чрез промяна на всяка итерация стойност на индекса.
Инициализиране на масиви (присвояване на начални стойности за всички компоненти масиви) се извършва по два начина. Първият метод - използване на въведените константи, например:
Типове Маса = Array [1..10] на Real;
конст
К: Маса = (0, 2.1, 4, 5.65, 6.1, 6.7, 7.2, 8, 8.7, 9.3);
При инициализация на двуизмерни масиви от стойности на компоненти на всяка от съставните й едномерни е написано в скоби:
Типове Mass3x2 = Array [1..3,1..2] на цяло число;
конст
L: Mass3x2 = ((1, 2) (3, 4), (5, 6));
Въвеждане на едномерен масив от елементи с клавиатурата:
A: масив [1..10] на цяло число.
Защото: = 1 до 10 направи
започвам
Добави ( "въвеждане на [ ', I,'] ');
Вижте (А [Ь])
приключи;
Ако искате да се инициализира масив от произволни стойности, а след това се използва генератор на случайни числа.
Случаен;
Защото: = 1 до 10 направи
А [Ь]: = Произволни (100);
Randomize процедура инициализира вграден генератор на случайни числа. Случайни Function (100) се връща на всяка итерация, случайно число в диапазона от 0 до аргумент предварително определена стойност (100-1).
Въвеждане на двумерен масив от елементи:
В: масив [1..20,1..20] на Real.
Защото: = 1 до 20 направи
Защото: = 1 до 20 направи
започвам
Добави ( "Enter Б [ ', I,'] ');
Вижте (Б [Ь])
приключи;
Да предположим, че искате да се намери сумата от елементите на едномерен масив, състоящ се от 20 елемента на действителния тип.
За да се реши този проблем, е необходимо да се инициализира на нулевата стойност на променливата се използва за съхранение на сумата. Последователно написали стойностите на елементите на масива и ги добавете към променливата. Ние ще използваме една линия с параметъра за решаването на проблема. По-долу е даден блок програма за решаване на проблема.
Програма Example_1;
Var
A: масив [1..20] на Real;
S: Real;
I: Integer;
започвам
S: = 0;
Защото: = 1 до 20 направи
започвам
Добави ( "въвеждане на [ ', I,'] ');
Вижте (А [I]);
S: = S + A [I]
приключи;
WriteLn ( "резултат от сумиране. ', S)
Край.
Виж сумата на отрицателни елементи на едномерен масив, състояща се от 100 елементи от типа число, сериен номер, който е кратно на три.
Създаване на алгоритъм и програма, за да се намери сумата от едномерен масив от елементи.
За да влезете в елементите на масив, използвайки генератор на случайни числа. Тялото на цикъла, ще се въведе логическа единица решение за определяне на предварително определено състояние в обработващите елементи в масива.
По-долу е на програма за решаване на проблема.
Програма Example_2;
Var
A: масив [1..100] на цяло число;
S, I: цяло число;
започвам
Случаен;
S: = 0;
Защото: = 1 до 100 направи
започвам
А [I]: = Произволни (100) - Random (50);
е (I моден 3 = 0) и (А [I]<0) then S:=S+A[I]
приключи;
WriteLn ( "резултат от сумиране. ', S)
Край.
Като продукт на елементи се намалява до променлива единица инициализация за съхраняване на произведението. В линия масив елементи са подредени чрез сравняване, ако е необходимо, с предварително зададено условие, и се размножават тази променлива в избрана клетка масив.
Виж продукта от положителните елементи на едномерен масив, състояща се от 100 елементи от тип цяло число.
Съставете намери алгоритъм и програмни продукти от елементи на едномерен масив.
Инициализиране на променлива за съхраняване на произведението. За да влезете в елементите на масив, използвайки генератор на случайни числа. Тялото на цикъла, ще се въведе логическа единица решение за определяне на предварително определено състояние в обработващите елементи в масива.
По-долу е на програма за решаване на проблема.
Програма Example_3;
Var
A: масив [1..100] на цяло число;
S, I: цяло число;
започвам
Случаен;
P: = 1;
Защото: = 1 до 100 направи
започвам
А [I]: = Произволни (100) - Random (50);
Ако А [I]> 0, тогава Р: = P * A [I]
приключи;
WriteLn ( "Изход продукт.", P)
Край.
Предвид двумерен масив, състояща се от елементи от тип цяло число. Размерът на 20x20 масив. Намерете сумата от елементите на основните елементи и страната на продукт на диагоналите.
За да се определи лежи на главния диагонал на елемента, припомни, че тя е равна на номера на реда на номера на колоната. лежи по втори диагонал на елемент, може да се определи чрез уравнението - I + J = N + 1, където, J - съответно, ред и колона индекси, и N - ред на матрицата.
Програма Example_4;
Var
A: масив [1..20,1..20] на цяло число;
S, Р, I, J: цяло число;
започвам
Случаен;
P: = 1; S: = 0;
Защото: = 1 до 20 направи
За J: = 1 до 20 направи
започвам
А [I, J]: = Произволни (100) - Random (50);
Ако = J тогава S: = S + A [I, J];
Ако I + J = 20, тогава Р: = P * A [I, J];
приключи;
WriteLn ( "Изходен продукт. ', Р);
WriteLn ( "Изходни суми. ', S)
край
Свързани статии