Практикум по программированию на языке Turbo Pascal. Часть 1. Портнягина В.В - 96 стр.

UptoLike

ReadKey;
END.{1}
Пояснения к задаче 5
Каждый раз, когда внутренний цикл завершается, внешний цикл увели-
чивает i на единицу и внутренний цикл выполняется вновь. Таким образом,
сначала вводятся, а потом выводятся все компоненты массива по строкам.
При выводе мы умножаем каждый элемент массива на 3.
При описании массивов в программе удобно использовать именованные
константы как значения верхних границ индексов массива. При задании мас-
сива как сложной константы в блоке Const (или в блоках, если их несколько)
в круглых скобках перечисляются элементы-массивы, состоящие из элемен-
тов-скаляров. Для двумерного массива это может выглядеть так:
Const
a: Array [1..2, 1..5] of Integer = ((–1, 23, 0, 7, 6), (2, 0, –12, 6, 4));
Трехмерный массив можно задать аналогично или следующим образом:
Type
Cube = Array [0..1, 0..1, 0..1] of Integer;
Const
M : Cube = (((0, 1), (2, 3)), ((4, 5), (6, 7)));
Элементы трехмерного массива будут хранить после этого следующие
значения:
М[0, 0, 0] = 0; М[0, 0, 1] = 1; М[0, 1, 0] = 2; М[0, 1, 1] = 3;
М[1, 0, 0] = 4; М[1, 0, 1] = 5; М[1, 1, 0] = 6; М[1, 1, 1] = 7.
3.3. Стандартные (типовые) задачи на двумерных массивах
В стандартной матричной задаче может потребоваться:
1) получить новую матрицу (ввести матрицу) по заданному правилу;
2) найти какую-либо величину, используя элементы данной матрицы;
3) преобразовать матрицу требуемым образом;
4) определить, обладает ли матрица (ее один или несколько элементов,
строка, столбец) указанным свойством;
5) выполнить ту или иную операцию над матрицей (матрицами).
Задача 6 иллюстрирует использование вложенных циклов при вычисле-
нии двойных сумм.
Задача 6
Вычислить:
∑∑
==
+
100
1
50
1
2
1
ij
ji
.
{$N +, E}
PROGRAM Lab7_6;
Uses Crt;
var
sum: extended;
96
    ReadKey;
    END.{1}

     Пояснения к задаче 5
     Каждый раз, когда внутренний цикл завершается, внешний цикл увели-
чивает i на единицу и внутренний цикл выполняется вновь. Таким образом,
сначала вводятся, а потом выводятся все компоненты массива по строкам.
При выводе мы умножаем каждый элемент массива на 3.
     При описании массивов в программе удобно использовать именованные
константы как значения верхних границ индексов массива. При задании мас-
сива как сложной константы в блоке Const (или в блоках, если их несколько)
в круглых скобках перечисляются элементы-массивы, состоящие из элемен-
тов-скаляров. Для двумерного массива это может выглядеть так:
     Const
     a: Array [1..2, 1..5] of Integer = ((–1, 23, 0, 7, 6), (2, 0, –12, 6, 4));
     Трехмерный массив можно задать аналогично или следующим образом:
     Type
         Cube = Array [0..1, 0..1, 0..1] of Integer;
     Const
         M : Cube = (((0, 1), (2, 3)), ((4, 5), (6, 7)));
     Элементы трехмерного массива будут хранить после этого следующие
значения:
     М[0, 0, 0] = 0; М[0, 0, 1] = 1; М[0, 1, 0] = 2; М[0, 1, 1] = 3;
     М[1, 0, 0] = 4; М[1, 0, 1] = 5; М[1, 1, 0] = 6; М[1, 1, 1] = 7.

    3.3. Стандартные (типовые) задачи на двумерных массивах
    В стандартной матричной задаче может потребоваться:
    1) получить новую матрицу (ввести матрицу) по заданному правилу;
    2) найти какую-либо величину, используя элементы данной матрицы;
    3) преобразовать матрицу требуемым образом;
    4) определить, обладает ли матрица (ее один или несколько элементов,
строка, столбец) указанным свойством;
    5) выполнить ту или иную операцию над матрицей (матрицами).
    Задача 6 иллюстрирует использование вложенных циклов при вычисле-
нии двойных сумм.

    Задача 6
                 100 50
                             1
    Вычислить:   ∑∑ i + j 2 .
                 i =1 j =1
    {$N +, E}
    PROGRAM Lab7_6;
    Uses Crt;
    var
     sum: extended;

                                      96