Данная программа содержит в себе необходимые процедуры и функции с использованием стандартных модулей языка Turbo Pascal:
Сrt - модуль, содержащий в себе функции, необходимые для работы с экраном в текстовом режиме
Strings - модуль, функции которого обеспечивают работу со строковыми переменными.
Так же при разработке программы для её упрощения были использованы модули из библиотеки ТТТ: FastTTT5, StrnTTT, ReadTTT5, WinTTT5, которые предазначены для упрощения процесса программирования при работе с экраном, поцессом ввода и вывода информации.
В начале программы вызывается функция модуля WinTTT5 - СlearText, которая очищает заданную область экрана и запролняет его заданным цветом.
Затем вызывается фунуция модуля ReadTTT5 - Read_Longint, которая рисует на экране рамку в заданных координатах и заданным размером, выводит приглашение и организует ввод.
После ввода вызывается функция ValToStr с параметром sum типа Longint - введённая пользователем сумма. Эта функция выполняет перевод денежной суммы из числового формата в словесный. Она содержит в себе несколько служебных функций:
Функция STR0_9(n9,strS:char):String, где n9 - денежная сумма, находящаяся в интервале значений от 0 до 9, strS - род деннежной единицы. Функция осуществляет перевод денежной единицы из числового формата в словесный на заданном интервале значений
Функция STR10_19(n19:char):String, где n19 - денежная сумма, находящаяся в интервале значений от 10 до 19. Функция осуществляет перевод денежной единицы из числового формата в словесный на заданном интервале значений
Функция STR20_90(n99:char):String, где n99 - денежная сумма, находящаяся в интервале значений от 20 до 90. Функция осуществляет перевод денежной единицы из числового формата в словесный на заданном интервале значений
|
Функция STR_Hund(nHund:char):String, где nHund - сотенная часть денежной суммы. Функция осуществляет перевод этой части денежной единицы из числового формата в словесный
Функция STR0_999(strP_100,strP_10,strP_1,strSex:char):String, где strP_100 - сотенный элемент денежная суммы, strP_10 - элемент десятков денежная суммы, strP_1 - элемент единиц денежная суммы, strSex - род денежной единцы. Функция осуществляет соединение в одну строку полученных значений в словесном эквиваленте для части денежной суммы, находящейся в интервале от 0 до 999.
Далее в основной программе вызывается фунуция модуля WinTTT5 - OffCursor, которая отключает изображение курсора на экране.
Затем вызывается фунуция модуля FastTTT5 - WriteAT, которая осуществляет вывод заданного текста нужным цветом в заданные координаты экрана.
В конце программы вызывается фунуция модуля WinTTT5 - Reset_StartUp_Mode, которая восстанавливает исходный режим экрана.
Используемые технические средства
Данная программа предназначена для её изпользования на персональном компьютере типа IBM - PC стандартной конфигурации с минимальным объёмом оперативной памяти 640 К.
Вызов и загрузка
Для вызова программы на выполнение необходимо с помощью команд операционной системы компьютера сделать текущим каталог, в котором находится файл cyrrency.exe и вызвать его на выполнение.
Входные данные
Входными данными является денежная сумма в числовом формате, вводимая пользователем с клавиатуры.
Выходные данные
Выходными данными является денежная сумма в словесном формате, отображается программой на экране.
5. Программа и методика испытаний
Цель испытаний
Испытания имеют целью убедиться в правильности работы программы преобразования денежных сумм в чековой книжке из формата чисел в словесный формат.