    Сейчас на сайте: 1 посетителей (1 зарегистрированных, 0 гостей) |   426057681  574055213 |  Партнерам |  Авторам |  Покупателям |
Обработка одномерных массивов.
| контрольные работы, Информатика Объем работы: 6 стр. Год сдачи: 2008 Стоимость: 560 руб. Просмотров: 750 | Не подходит работа? |
Оглавление
Введение
Литература
Заказать работу
1.1. Описание массивов на языке Турбо Паскаль;
Массив описывается в разделе переменных посредством указания типа его элементов и максимального их количества. Тип элементов может быть любым. При задании максимального числа элементов массива (числа ячеек таблицы) обычно употребляют диапазон целых чисел. Общий вид описания массива следующий:
VAR Имя массива : ARRAY[размерность] OF тип элементов ;
К имени массива предъявляются те же требования, что и к имени переменной.
Размерность - это диапазон целых чисел, каждое из которых является порядковым номером (индексом) одной из ячеек массива. Обычно диапазон индексов задают, начиная от единицы: [1..100]. Это удобно, но не обязательно. Важно лишь, чтобы правая граница диапазона была больше или равна левой границе.
Program Primer;
Const Max=100;
Var A:Array[1..50] of Real; {массив "А"состоит из 50-ти вещественных чисел}
B:Array[1..Max] of integer; {массив "В"состоит из ста целых чисел}
Mas:Array[1999..2000] of integer; {массив "Mas"состоит из 2-х целых чисел}
Mas2:Array[-700..-1] of Real; {массив "Mas2"состоит из 700 вещественных чисел}
...................................
При описании массивов, задавая числовые пределы изменения индексов, обычно указывают максимально возможное число элементов, которое может быть востребовано в данной программе; при этом допускается, что фактическое количество элементов может оказаться меньше, чем затребовано. Но если значение индекса элемента массива не входит в указанный при описании диапазон, это приведет к ошибке.
Массив описывается в разделе переменных посредством указания типа его элементов и максимального их количества. Тип элементов может быть любым. При задании максимального числа элементов массива (числа ячеек таблицы) обычно употребляют диапазон целых чисел. Общий вид описания массива следующий:
VAR Имя массива : ARRAY[размерность] OF тип элементов ;
К имени массива предъявляются те же требования, что и к имени переменной.
Размерность - это диапазон целых чисел, каждое из которых является порядковым номером (индексом) одной из ячеек массива. Обычно диапазон индексов задают, начиная от единицы: [1..100]. Это удобно, но не обязательно. Важно лишь, чтобы правая граница диапазона была больше или равна левой границе.
Program Primer;
Const Max=100;
Var A:Array[1..50] of Real; {массив "А"состоит из 50-ти вещественных чисел}
B:Array[1..Max] of integer; {массив "В"состоит из ста целых чисел}
Mas:Array[1999..2000] of integer; {массив "Mas"состоит из 2-х целых чисел}
Mas2:Array[-700..-1] of Real; {массив "Mas2"состоит из 700 вещественных чисел}
...................................
При описании массивов, задавая числовые пределы изменения индексов, обычно указывают максимально возможное число элементов, которое может быть востребовано в данной программе; при этом допускается, что фактическое количество элементов может оказаться меньше, чем затребовано. Но если значение индекса элемента массива не входит в указанный при описании диапазон, это приведет к ошибке.
1.3. Реализация алгоритмов вычисления суммы или произведения элементов массива, нахождения наибольшего или наименьшего элементов.
Вычисление суммы, произведения, наибольшего и наименьшего значений массива покажем в одной блок-схеме.
Обозначения в блок-схеме алгоритма:
A[n] – одномерный массив из n элементов (чисел);
i – счетчик элементов;
S – сумма элементов массива;
P – произведение элементов массива;
Amin – минимальный элемент массива;
Amax – максимальный элемент массива.
В алгоритме допущено, что массив уже введен;
1.2. Ввод с клавиатуры и вывод на экран одномерных и двумерных массивов;
Вводить и выводить значения из массивов целесообразно поэлементно, используя в цикле операторы Readln, Write, Writeln и оператор присваивания.
Program Vvod_Vivod;
Var i:integer;
A:Array[1..20] of Real;
Begin
Writeln(Введите числа в массив: );
FOR i:=1 TO 20 DO
begin Write(A[,i,]= ); Readln(A[i]) end;
FOR i:=1 TO 20 DO Writeln(A[,i,]=,A[i]:6:2);
Readln
End.
Для двумерных массивов:
Program Vvod_Vuvod2;
Var a:array[1..9,1..9] of real;
i,j:integer;
Begin;
writeln(Введите элементы из диапазона );
for i:=1 to 9 do
for j:=1 to 9 do
write(A[,i,,,j,]=); readln(a[i,j]);
writeln(ВВЕДЕННАЯ МАТРИЦА:);
for i:=1 to 9 do
begin
for j:=1 to 9 do
write(a[i,j]:5:2, :3);
end;
end.
После офорления заказа Вам будут доступны содержание, введение, список литературы*
*- если автор дал согласие и выложил это описание.