Информация для пользователей Паскаля: система Turbo Paskal также содержит быстрый вариант Writeln (содержащийся в модуле Crt). Мы даем указание об использовании этой быстрой версии посредством включения оператора uses Crt в начало нашей программы. В этом заключено единственное отличие PRIME5PA от предыдущего варианта.
Вызовите локальное меню окна Module (Модуль) и установите «области» для каждой строки исходного текста PRIME5. Запустите PRIME5, после чего изучите количественные данные профилирования для строки 28 в PRIME5 (или строки 3 в PRIME5PA).
Более быстрый вариант функции вывода на каждых 168 вызовах экономит почти одну секунду.
Удаление пар символов cr/lf («возврат каретки»/«перевод строки») (PRIME6).
И, наконец, одно последнее изменение. Вместо того, чтобы выводить пару символов «возврат каретки»/«перевод строки» после каждого обнаруженного простого числа, попробуйте выводить просто символ «пробел». В этом и заключается единственное изменение, сделанное в программе PRIME6.
Загрузите PRIME6 (пользователям Паскаля необходимо загрузить PRIME6PA) и установите маркеры «области» на каждой строке, затем выполните эту программу.
О чудо! Удаление пар символов «возврат каретки»/«перевод строки» сократило время выполнения почти в 7 раз. Теперь стал очевиден тот факт, что переход на новую строку это дорогостоящая операция. В результате всех внесенных изменений времена выполнения и количества вызовов распределились довольно-таки равномерно.
(Рис. 1.8). Вряд ли нам удастся выжать еще что-нибудь из этой программы без основательной переработки алгоритма.
Рис. 1.8 Временная и количественная статистика программы PRIME6.
А что же дальше?
В этой главе мы научили Вас основам профилирования. К настоящему моменту Вы уже должны научиться обращаться с системой Turbo Profiler до такой степени, чтобы уметь загружать и профилировать программы, печатать содержимое различных окон, сохранять и восстанавливать статистику профилирования и менять расположение и размеры окон для облегчения анализа статистики.
На этом закончим наше обучение и покинем среду системы Turbo Profiler (выберите File| Quit (Файлы| Выход) или просто нажмите Alt-X).
Для того, чтобы получить более обширную информацию о среде системы Turbo Profiler, в том числе и о тех частях профилировщика, которые не были рассмотрены в данной главе, Вам необходимо обратиться к главе 4, являющейся полным справочным руководством по среде системы Turbo Profiler.
