const CTask = 'Name';
CIn = CTask+'.in';
COut = CTask+'.out';
procedure ReadData;
var F: text;
begin
Assign(F, CIn); Reset(F);
Close(F);
end;
procedure WriteData;
var F: text;
begin
Assign(F, COut); Rewrite(F);
Close(F);
end;
begin
ReadData;
WriteData;
end.
Взяв за основу шаблон, и определив константу CTask для имен файлов, вы получите отчасти готовую программу.
Организаторы гарантируют правильность входных данных в своих тестах. Если в условии сказано, что число лежит в пределах от 1 до 10, то так оно и будет. Но это не значит, что вы введете его таким, – ошибка может затаиться в процедуре ввода. Она сведет на нет последующие правильные действия, и вы не получите нужный ответ. Так проверяйте ввод данных (отладчиком или выводом на экран). Разумеется, что для проверки решения вам придется выдумать свои тесты, поскольку тесты жюри участникам неизвестны.
Когда пыль уляжется…
И вот тестирование завершено, и результаты оглашены. Где мы с вами? Впереди на белом коне? Поздравляю! Искупайтесь в лучах славы, и, обсохнув на лаврах, начинайте готовиться к следующему этапу.
А если неудача? Каждый переживает ее по-своему. Кто-то даст волю чувствам и размажет слезы по щекам. Но вы не из тех, – я знаю. Поражение закаляет упорных. Внимательно прослушайте разбор задач, – его устраивают по окончании туров. Разберитесь в своих ошибках, решите задачи дома. А может, вам просто не хватило времени? – не беда, ведь и среди великих встречались тугодумы. Не опускайте рук, работайте, и обязательно добьетесь успехов. В конце концов, олимпиада – это всего лишь ступенька, которую можно… перепрыгнуть. Все ещё впереди!
Приложение А
Установка и настройка IDE Borland Pascal
Рассмотрим установку и настройку интегрированной среды разработки Borland Pascal. Она создавалась для операционной системы MS-DOS, а такие приложения, исполняемые под Windows, своенравны, и требуют особого подхода.
Далее мы рассмотрим:
• историю создания IDE Borland Pascal и её состав;
• установку IDE из официального дистрибутива;
• устранение ошибки в модуле CRT;
• русификацию справочной системы;
• организацию рабочей папки;
• создание и настройку ярлыка для запуска IDE;
• предварительную настройку IDE;
• русификацию консольного окна;
• школьный пакет Turbo Pascal School Pak.
Полагаю, что ваш компьютер оснащен одной из операционных систем семейства Windows. Разным системам свойственны небольшие отличия в настройке IDE, они будут отмечены мною по ходу изложения.
История IDE Borland Pascal, состав дистрибутива
Седьмая версия IDE Borland Pascal – самая совершенная версия этого продукта. Её появление в начале 90-х годов совпало с расцветом операционной системы Windows 3.1 – первой коммерческой системы этого рода. Фирма Borland, шагая в ногу со временем, предусмотрела в своем товаре компилятор для разработки программ под Windows, ставший прообразом Delphi. В этом же пакете Borland предложила два компилятора для MS-DOS: один, более мощный, – для современных компьютеров, а другой – для компьютеров на слабеньких процессорах Intel 80x86. Прошли годы, и – странное дело! – компилятор под Windows 3.1 давно забыт, а для MS-DOS – все ещё в ходу!
Несколько позже, после седьмой версии IDE, было выпущено её обновление – версия 7.1. Предпочтительней пользоваться обновленной версией. Различить их можно по времени создания файлов, которое составляет соответственно «07:00» и «07:01». После установки версии 7.0, обновление IDE до версии 7.1 выполняется заменой части файлов.
Нельзя умолчать о проблеме, проявившейся на мощных процессорах Pentium. Высокая скорость этих чипов выявила изъян в библиотечном модуле CRT, что порождало беспричинные аварийные сообщения при запуске программ: «Runtime Error 200» – ошибка деления на ноль. Фирма Borland эту проблему не устранила, но её решили почитатели Паскаля. В Интернете можно найти бесплатные «заплатки», исправляющие модуль CRT.
И напоследок о приятной мелочи. В том же Интернете есть перевод на русский язык встроенной в IDE справочной системы, рекомендую скачать русскую справку и заменить ею фирменный англоязычный файл.
Итак, для полноценной установки IDE Borland Pascal вам потребуются:
• дистрибутив Borland Pascal 7.0;
• обновление дистрибутива до версии Borland Pascal 7.1 (содержит в числе прочих файлы «BP7BIN.ZIP» и «BP7ETC.ZIP»):
Читать дальше