10207

Использование модулей при написании программного кода

Лабораторная работа

Информатика, кибернетика и программирование

Лабораторная работа № 8 Тема: Модули Цель работы: отработать навыки использования модулей при написании программного кода. Образец решения задачи. Задача № 1. Вставьте в двумерный массив строку из нулей после строки с номером t. Анализ постановки задачи В задаче ...

Русский

2013-03-21

69.5 KB

1 чел.

Лабораторная работа № 8

Тема: Модули

Цель работы: отработать навыки использования модулей при написании программного кода.

Образец решения задачи.

Задача № 1. Вставьте в двумерный массив строку из нулей после строки с номером t.

Анализ постановки задачи

В задаче опишем два модуля. В первом модуле опишем объекты программы, которые будут использоваться не только в основной программе, но и в других модулях. Во втором модуле будут находиться процедуры обработки данных.

Функциональная структура алгоритма

Текст программы

{Модуль 1, содержащий описания используемые, как в основной программе, так и в другом модуле}

unit op;

interface

const   MaxN=100; MaxM=80;

type     TMyArray=Array[1..MaxN, 1..MaxM] of Integer;

implementation

end.

{Модуль 2, содержащий процедуры ввода, вывода, сдвига строк и заполнение  строки t - нулями}

unit sdvig;

interface

 uses op;

 procedure Zapolnenie(v, w: integer; var X :TMyArray);

 procedure Vivod (v, w: integer; X :TMyArray);

 procedure SdvigStr (v, w, r: integer; var X :TMyArray);

 procedure InsertStr (w, r: integer; var X :TMyArray);

implementation

  var i, j : integer;

procedure Zapolnenie;

begin

For i:=1 to v do

 For j:=1 to w do

  X[i, j]:=random(20)-10;

end;

procedure Vivod;

begin

For i:=1 to v do

begin

 For j:=1 to w do  write(X[i, j], ‘ ‘);

 Writeln;

 end;

end;

procedure SdvigStr;

begin

For i:=v downto r+1 do

            For j:=1 to w do  X[i+1, j]:= X[i, j];

end;

procedure InsertStr;

begin

For j:=1 to w do  X[r+1, j]:=0;

end;

end.

{Основная программа}

uses op, sdvig;

var       A           : TMyArray;

           n, m, t     : Integer;

begin

Writeln(‘введите количество строк <100 и столбцов <=80’);

Readln(n, m);

If (n>=100) or (m>80) then Writeln(‘Неправильный ввод данных’)

    Else begin

Writeln(‘введите номер строки после которой будет вставляться

строка из нулей’);

Readln(t);

If  t>n then Writeln(‘Неправильный ввод данных’)

        Else begin

   Zapolnenie(n, m, A);

  {вывод элементов заполненного массива}

   Vivod(n, m, A);

   SdvigStr(n, m, t, A);

   InsertStr(m, t, A);

  {вывод элементов измененного массива}

   Vivod(n, m, A);

   end;

end;

end.

Задача № 2. Известна таблица футбольного чемпионата и список команд-участниц. В каждой строке таблицы записано количество побед, ничьих и поражений соответствующей команды. Подсчитать количество сыгранных каждой командой матчей, а также в итоговой таблице команды расположить в порядке убывания завоеванных ими очков.

Анализ постановки задачи.

В данной задаче опишем три модуля. В первом модуле опишем объекты программы, которые будут использоваться не только в основной программе, но и в других модулях. Во втором модуле будут  процедуры ввода-вывода данных. В третьем модуле будут находиться процедуры обработки данных.

Функциональная структура алгоритма

Текст программы

{Модуль 1, содержащий описание данных}

unit op;

interface

const   MaxN = 10; {число команд}

type     TMyArray= array[1..MaxN, 1..5] of integer;

            TArray= array[1.. MaxN] of string[30];     

implementation

end.

{Модуль 2, содержащий процедуры ввода-вывода данных обработки}

unit vv_viv;

interface

 uses op;

 procedure Zapolnenie_Game(v: integer; var X :TMyArray);

 procedure Zapolnenie_Team(v: integer; var X : TArray);

 procedure vivod (v: integer; var X : TMyArray; var Y: TArray );

implementation

  var i, j : integer;

procedure Zapolnenie_Game;

begin

For i :=1 to v do

 For j :=1 to 3 do

                Readln(X[i, j]);

end;

procedure Zapolnenie_Team;

begin

For i :=1 to v do

 Readln(X[i]);

end;

procedure vivod;

begin

    writeln;

    writeln('** Итоговая таблица**');

    writeln('------------------------------------------------------');

    writeln('    Команда    Матчей   Побед   Ничьих   Поражений   Очков');

    writeln('------------------------------------------------------');

    for i := 1 to v do

        begin

           write(i:2,'. ',y[i]);

           for j:=1 to 5 do

                 write(x[i, j]:7);

           writeln;

        end;

    writeln('------------------------------------------------------');

end;

end.

{Модуль 3, содержащий процедуры обработки данных}

unit obrabotka;

interface

 uses op;

 procedure Sum_st4 (v : integer; var X :TMyArray);

 procedure Sum_st5 (v : integer; var X :TMyArray);

 procedure SortStr (v: integer; var X : TMyArray; var Y: TArray );

implementation

  var i, j : integer;

procedure Sum_st4;

begin

For i:=1 to v do

 begin  

        X[i, 4]:=0;

               For j :=1 to 3 do  X[i, 4]:= X[i, 4]+X[i, j];

 end;

end;

procedure Sum_st5;

begin

For i:=1 to v do

       X[i, 5]:= X[i, 1]*3+X[i, 2];

end;

procedure SortStr;

var  n_max, temp1     : integer;

       temp                    : string[30];

begin

  for i:=1 to N-1 do

           begin

             n_max:=i;

             for j:=i+1 to N do

                     if x[j, 5]>x[n_max, 5] then n_max:=j;

            temp:=y[i];

            y[i]:=y[n_max];

            y[n_max]:=temp;

            for j:=1 to 5 do

                    begin

                         temp1:=x[i, j];

                         x[i, j]:=x[n_max, j];

                         x[n_max, j]:=temp1

                    end

          end;  

end;

end.

{Основная программа}

uses op, vv_viv, obrabotka;

var

    Team        : TArray;

    Game       : TMyArray;

     n              : integer;

begin

 Writeln(‘Введите количество команд’);

 Readln(n);

          Zapolnenie_Game (n, Game);

Zapolnenie_Team(n, Team);

 {Подсчет количества матчей 

Sum_st4(n, Game);

{Подсчет количества очков}

Sum_st5(n, Game);

{Сортировка таблицы по столбцу с количеством очков}

     SortStr (n, Game, Team);

    {Вывод итоговой таблицы}

vivod(n, Game, Team);

end.

Задания для самостоятельного решения.

Для задач своего варианта лабораторной работы № 7 написать программы с использованием модулей.

Контрольные вопросы:

1. Модуль начинается заголовком, состоящим из зарезервированного слова ________ и имени модуля.

2. Часть программы, рассматриваемая как самостоятельная синтаксическая единица это _____________________________

3. Зависимость результата работы модуля от исходных данных, но не от работы других модулей называется

ВАРИАНТЫ ОТВЕТОВ:

  1.  функциональной завершенностью
  2.  логической независимостью
  3.  прочностью модуля
  4.  структурированностью данных

4. В модульном программировании борьба со сложность программы осуществляется через

ВАРИАНТЫ ОТВЕТОВ:

  1.  обеспечение небольшого размера модуля
  2.  использование небольшого числа команд
  3.  разбиение на максимальное число модулей
  4.  обеспечение независимости компонент системы, использование иерархических структур

5. Модуль должен иметь:

ВАРИАНТЫ ОТВЕТОВ:

  1.  один вход и несколько выходов
  2.  несколько входов и множество выходов
  3.  множество входов и множество выходов
  4.  один вход и один выход

6. Мера внутренних связей модуля характеризует его

ВАРИАНТЫ ОТВЕТОВ:

  1.  прочность
  2.  сцепление
  3.  сложность
  4.  рутинность

7. Мера зависимости по данным от других модулей характеризует его

ВАРИАНТЫ ОТВЕТОВ:

  1.  прочность
  2.  сцепление
  3.  сложность
  4.  рутинность

8. Если результат обращения к модулю зависит только от значений его параметров, то это  характеризует его

ВАРИАНТЫ ОТВЕТОВ:

  1.  прочность
  2.  сцепление
  3.  сложность
  4.  рутинность

9. Модуль состоит из

ВАРИАНТЫ ОТВЕТОВ:

  1.  декларативной части, исполнительной части
  2.  интерфейсной части, секции реализации, секции инициализации
  3.  интерфейсной части, секции реализации
  4.  декларативной части, исполнительной части, секции инициализации

10. Должно ли имя модуля совпадать с именем файла, в который помещается исходный текст модуля? Если да, то почему?  

11. Является ли модуль выполняемой программой?

12. Какие объекты программы содержит интерфейсная часть модуля?

13. Какие объекты программы содержит секция связи модуля?

14. Является ли обязательной инициализирующая часть модуля?

15. Какие объекты программы может  содержать  инициализирующая часть модуля?


заполнение массива

сдвиг строк

аполнение  строки t - нулями

вывод результата 

задача

Модуль 1

Описание данных

Модуль 2

Обработки данных

заполнение одномерного массива

заполнение двумерного массива

вывод результата в виде таблице 

количество матчей и очков для каждой команды

количество матчей для каждой команды

количество очков для каждой команды

сортировка по столбцу с количеством очков

задача

Модуль 1

Описание данных

Модуль 2

Ввода-вывода данных

Модуль 3

Обработки данных


 

А также другие работы, которые могут Вас заинтересовать

37697. Встановлення вимог до функціональності програмного забезпечення із застосуванням засобів UML (Use Case diagram) та вербальних Специфікацій 150 KB
  Поселення відбувається портє і далі передається адміністратору для підтвердження внесення даних до БД. Адміністратор виконує всі операції з БД в тому числі: внесення змінення та видалення записів з бази а також внесення службової інформації що передбачає внесення особистих даних адміністратора та портьє. Портьє надає інформацію про поселення клієнтів адміністратору АС у вигляді: Перелік кімнат різних класів у готелі. Основний потік Надання інформації адміністратору.
37698. Визначення параметрів датчиків температури 117 KB
  Установка складається із теплового обєкта ТО резервуар з трансформаторним маслом в якому розміщені робочі гарячі спаї батареї термопар БТ резистори. Батарея термопар складається із трьох послідовно включених термопар завдяки чому її сумарна тсрмое. Холодні кінці термопар заглиблені в рідину що має температуру оточуючого середовища. За допомогою контрольного термометра ТІ вимірять температуру холодних кінців термопар t0.
37700. Критерій Стьюдента 74.92 KB
  Щільність розподілу Графік щільності розподілу Стьюдента за зовнішнім виглядом нагадує нормальні криві. Але вони значно повільніше спадають до осі t якщо особливо за малих значень n Складено таблиці розподілу Стюдента здебільшого виду для кількості ступенів волі від 1 до 20. Якщо кількість ступенів волі більша то можна застосовувати нормальний закон розподілу з нульовим математичним сподіванням і одиничною дисперсією. Щільність цього розподілу подається формулою: Щільність розподілу Фішера має графік зображений на Для розподілу Фішера...
37701. Ознайомлення з середовищем програмування. Структура програми. Програмування лінійних та розгалужених алгоритмів 1.24 MB
  Тема: ознайомлення з середовищем програмування. Структура програми. Програмування лінійних та розгалужених алгоритмів. Мета: навчитись програмувати лінійні та розгалужені алгоритми мовою програмування С.
37702. Моделювання і розробка ІС 691 KB
  У рамках Rtionl Rose використовуються наступні графічні діаграми UML: Діаграма варіантів використання дозволяє здійснити аналіз функцій системи. Діаграма класів дозволяє описати структуру інформаційних обєктів ІС. Діаграма станів дозволяє відобразити зміни станів окремого об'єкта чи субєкта ІС представляючи його у вигляді спеціального орієнтованого графа. Діаграма діяльності використовуються для опису інформаційних процесів; Діаграма послідовності служить для моделювання характеристик взаємодії передачі і прийому...
37703. Побудова локальної комп’ютерної мережі 1.95 MB
  2 Завдання: Навчитись встановлювати драйвери мережних адаптерів в середовищі операційних систем Windows 2000 XP; дослідити схеми підключення мережних пристроїв в локальній компютерній мережі топології âзіркаâ та âієрархічна зіркаâ; навчитись налаштовувати адресацію компютерів в локальній компютерній мережі; дослідити способи перевірки працездатності компютерної мережі за допомогою діагностичних утиліт. ІРАДРЕС МАСКУ ПОДСЕТИ ШЛЮЗ...
37705. Оцінка розміру та вартості проекту за моделлю COCOMO 64.5 KB
  Тема: Оцінка розміру та вартості проекту за моделлю COCOMO Мета: набуття навиків у прогнозуванні характеристик проектів ПЗ з використанням конструктивної моделі вартості CОnstructive CОst MОdel. Короткі теоретичні відомості COCOMO це множина моделей яка дозволяє обчислити вартість проекту ПЗ на основі одиниці виміру кількість рядків коду LOC. COCOMO включає наступні моделі: базова COCOMO застосовується у фазі специфікування вимог; проміжна COCOMO застосовується у фазах розробки множин вхідних умов проекту наприклад ...