Разработка программы для преобразования денежных сумм в чековой книжке из формата чисел в словесный формат
Категория реферата: Рефераты по информатике, программированию
Теги реферата: курсовые и дипломные работы, реферат
Добавил(а) на сайт: Каллист.
Предыдущая страница реферата | 1 2 3 4 5 6 7 8 9 10 11 | Следующая страница реферата
{Преобразование денежных сумм из числового формата в словесный}
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
Рекомендуем скачать другие рефераты по теме: реферат на тему предприятие, шпори скачать.
Предыдущая страница реферата | 1 2 3 4 5 6 7 8 9 10 11 | Следующая страница реферата