Реферат: Разработка программы для преобразования денежных сумм в чековой книжке из формата чисел в словесный формат

Применение этой программы возможно на IBM - совместимых компьютерах , где установлена система MS - DOS и оснащённых любым видеоадаптером , поддерживающем текстовый режим 80х25 символов.

Список литературы

1. Шахов Э.К. Разработка и документирование программ. Методические ука зания к курсовой работе по программированию. -Пенза : Изд-во Пенз.гос.техн.ун-та,1994. - 59 с.,ил. 8 , табл. 6., библиогр.8 назв.

2. Сергиевский М.В., Шалашов А.В. Турбо Паскаль 7.0 язык, среда программирования. -М: Машиностроение.-1994,-254 с.ил.

Листинг программы

{Преобразование денежных сумм из числового формата в словесный}

Program Currency

Uses Strings, Crt, FastTTT5, StrnTTT5, ReadTTT5, WinTTT5

Const

{Денежныеединицы}

strUnit1 : String='рубль'

strUnit2 : String='рубля'

strUnitM : String='рублей'

{Род денежной единицы

М : мужской

Ж : женский}

strSex : Char='М'

var

ch : Char

Sum : LongInt

{Сумма в числовом формате}

Str1, Str2, Prop : String

{сумма в словесном формате}

Index : Byte

{для разбиения 'Prop' на две строки,

если 'Prop' длиннее 60 символов}

{Переводит денежную сумму из числового формата в словесный}

FUNCTION ValToStr(nSumNum:LongInt):String

var

Tmp_Prop :String