Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / str,val substr,left.....? / 5 сообщений из 5, страница 1 из 1
10.01.2005, 13:03
    #32857401
SDF
SDF
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
str,val substr,left.....?
Privet,pomoqite pojalusta!
Yest peremenniy , dopustim n='23189152'
Nado eto peremenniy napisat v takom vide" 'dva tri odin vosem devit,odin pyat dva'
...
Рейтинг: 0 / 0
10.01.2005, 13:09
    #32857408
leaf
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
str,val substr,left.....?
function f1(s)
case s=='1'
return 'один'
case s=='2'
return 'два'
.......
function f2(s)
ss=''
for i=1 to len(s)
ss=ss+f1(substr(s,i,1))
endfor
return ss
...
Рейтинг: 0 / 0
13.01.2005, 18:24
    #32863946
DMITRY_PEREDISTY
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
str,val substr,left.....?
Может тебе нужно преобразовать число в текст?
мы все изобретали этот велосипед. см. влож. файл.
...
Рейтинг: 0 / 0
14.01.2005, 07:21
    #32864248
SDF
SDF
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
str,val substr,left.....?
Sposibo! U menya zadaca nemnoshko druqaya. ya chto to delal.Mne nado kajdoy tsifta otdelno pereobrozavat na text. Napirmer: 135=odin tri pyat (a ne sto tritsat pyat)
i ya cto-to delal. vot kod:

for k=1 to 8 (8-znachnaya tsifra)
ss=val(substr(n_a1,k,1))

if ss=0
ss1='nol '
endi
if ss=1
ss1='odin '
endi
if ss=2
ss1='dva '
endi
if ss=3
ss1='tri '
endi
.....
......
if ss=9
ss1='дevit '
endi

endf.


Vrode rabotaet.
...
Рейтинг: 0 / 0
14.01.2005, 07:29
    #32864254
SDF
SDF
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
str,val substr,left.....?
ss2=' '
ss1=' '
for k=1 to 8 (8-znachnaya tsifra)
ss=val(substr(n_a1,k,1))

if ss=0
ss1='nol '
endi
if ss=1
ss1='odin '
endi
if ss=2
ss1='dva '
endi
if ss=3
ss1='tri '
endi
.....
......
if ss=9
ss1='дevit '
endi
ss2=ss2+ss1

endf.
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / str,val substr,left.....? / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]