Предыдущая страница реферата | 1  2  3  4  5  6  7  8 | Следующая страница реферата

{Раздел инициализации модуля}

Begin

End.

Дадим некоторые рекомендации по разработке модулей:

1) спроектировать модуль, т.е. выделить основные и вспомогательные подпрограммы, другие ресурсы;

2) каждую подпрограмму целесообразно отладить отдельно, после чего «вклеить» в текст модуля.

Сохраним текст разработанной программы в файле DROBY.PAS и откомпилируем наш модуль. Для этого можно воспользоваться внешним компилятором, поставляемым вместе с Turbo Pascal. Команда будет выглядеть так: TPC DROBY.PAS. Если в тексте нет синтаксических ошибок, получим файл DROBY.TPU, иначе будет соответствующее сообщение с указанием строки, содержащей ошибку. Другой способ компиляции модуля — в среде программирования Turbo Pascal выбрать в пункте меню Run подпункты Make или Build (при этом должна быть включена компиляция на диск).

Теперь можно подключить модуль к программе, где планируется его использование.

Для примера решим задачу суммирования массива дробей.

Program Sum;

Uses Droby;

Var A : Array[1..100] Of Frac;

    I, N : Integer;

    S : Frac;

Begin

    Write('Введите количество элементов массива: ');

    ReadLn(N);

    S.P := 0; S.Q := 1; {Первоначально сумма равна нулю}

    For I := 1 To N Do {Вводим и суммируем дроби}

    Begin

 Write('Введите числитель ', I, '-й дроби: '); ReadLn(A[I].P);

 Write('Введите знаменатель ', I, '-й дроби: '); ReadLn(A[I].Q);

 Summa(A[I], S, S);

    End;

    WriteLn('Ответ: ', S.P, '/', S.Q)

Рекомендуем скачать другие рефераты по теме: антикризисное управление предприятием, шпори на телефон.





Предыдущая страница реферата | 1  2  3  4  5  6  7  8 | Следующая страница реферата