หากใครรู้ ช่วยชี่แนะหน่อยค่ะ
จะเขียนด้วย ภาษา ไรก็ได้ pascal , c++ , java , VB , asp
จะ post เอาไว้ หรือถ้าไม่เป็นการรบกวน ส่งมาที่ e-mail [email protected] ก็ได้ค่ะ
จะขอบคุณอยากมากค่ะ
นักศึกษา วิทย์ - คอมฯ ค่ะ
Tag : - - - -
Date :
12 ก.ค. 2548 16:48:19
By :
sooksai150
View :
2573
Reply :
4
No. 1
Guest
data=31485
strdata=Cstr(data) //แปลงตัวเลขให้เป็นสตริงเพื่อหาความยาว ค่าที่ได้เท่ากับ5
strlen=len(strdata) //ฟังก์ชัน len หาความยาวของสตริง
digit2=0
Do while ( strlen>=1)
if (strlen<>1 then
for i=1 to str-1 //
numdiv=i*10
end for i
digit=data/numdiv //ก็จะได้ตัวเลขหลักสูงสุด ในที่นี้คือหลักหมื่น
digit2=digit2+(digit*numdiv)
else
digit=data-digit2 //กรณีหลักหน่วยนะครับ
end if
strlen=strlen-1
Loop
แนวประมาณนี้นะครับ