Разработка программы для преобразования денежных сумм в чековой книжке из формата чисел в словесный формат
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: курсовые и дипломные работы, реферат
| Добавил(а) на сайт: Каллист.
Предыдущая страница реферата | 5 6 7 8 9 10 11 12 13 14 15 | Следующая страница реферата
str100:=str100+' '
Str0_999:=Strip('B',' ',str100+str99)
end
{***************** ValToStr *********************************}
Begin
{функция из StrnTTT5-переводит целое число в строку}
nNum:=Int_To_Str(nSumNum)
{функция из StrnTTT5-удаляет из строки символы,
(откуда удалять, что удалять, строка)}
nNum:=Strip('B',' ',nNum)
nLenNum:=length(nNum)
{вычисляем длину}
strHun:=''
strTh:=''
strMln:=''
{если сумма меньше 100}
IF nLenNum<3 then
begin
{функция из StrnTTT5-добавляем слева несколько пробелов}
nNum:=Squeeze('L',' ',3-nLenNum)+nNum
nLenNum:=Length(nNum)
end
{выделяем единицы, десятки и сотни}
str1:=nNum[nLenNum]
str10:=nNum[nLenNum-1]
Рекомендуем скачать другие рефераты по теме: реферат на тему предприятие, шпори скачать.
Категории:
Предыдущая страница реферата | 5 6 7 8 9 10 11 12 13 14 15 | Следующая страница реферата