Konversi Bilangan kedalam Nama Bilangan

Konversi bilangan kedalam nama bilangan banyak kita jumpai dalam kehidupan sehari-hari. Sebagai contoh pada saat kita mengontrak suatu rumah kost kita akan bertransaksi melalui suatu kwitansi dimana pada kwitansi tersebut terdapat 2 isian utama yaitu isian bilangan besarnya uang kontrak dan nama dari bilangan tersebut. Misalkan satu contoh kwitansi:

Angka : 60000,-

Terbilang : Enam Puluh Ribu Rupiah

Konversi bilangan kedalam nama bilangan juga kita temukan pada berbagai jenis organisasi baik jasa maupun komersial. Tujuan dari konversi ini umumnya untuk memudahkan pembacaan bilangan yang tertera sehingga dapat digunakan sebagai verifikasi atas besar bilangan yang tertera.

Berikut ini akan diuraikan teknik untuk mengkonversi bilangan ke nama bilangan.

Untuk nama bilangan dapat kita uraikan seperti berikut:
1. Untuk bilangan satu digit
Bilangan Nama Bilangan
0 nol
1 satu
2 dua
3 tiga
4 empat
5 lima
6 enam
7 tujuh
8 delapan
9 sembilan

2. Untuk dua digit
10 sepuluh
belas

3. Untuk 3 gigit
100 seratus

4. Untuk bilangan empat digit
1000 ribu

5. Untuk bilangan lima digit
10000 sepuluh ribu

6. Untuk bilangan enam digit
100000 seratus ribu

7. Untuk bilangan tujuh digit
1000000 satu juta

8. Untuk delapan digit
10000000 sepuluh juta

9. Untuk sembilan digit
100000000 seratus juta

10. Untuk sepuluh digit
1000000000 satu miliar

11. Untuk sebelas digit
10000000000 sepuluh miliar

12. Untuk dua belas digit
100000000000 seratus miliar

13. Untuk tiga belas digit
1000000000000 satu triliun

Analisis
1. Untuk satu digit
Misalkan terdapat suatu Bilangan A, maka penyelesaiannya:

Select Case A
Case 0 : Ket="Nol"
Case 1 : Ket="Satu"
Case 2 : Ket="Dua"
Case 3 : Ket="Tiga"
Case 4 : Ket="Empat"
Case 5 : Ket="Lima"
Case 6 : Ket="Enam"
Case 7 : Ket="Tujuh"
Case 8 : Ket="Delapan"
Case 9 : Ket="Sembilan"
End Select

2. Untuk Dua Digit

Select Case A
Case 10 : Ket="Sepuluh"
Case 11 : Ket="Sebelas"
Case Else
        Puluhan = Ambil_Puluhan(A)
        Satuan = Ambil_Satuan(A)
        IF Puluhan = 1 Then
            Ket = Satuan + " Belas"
        Else
              If  Satuan = 0  Then
               Ket = Puluhan + " Puluh"             
             Else
               Ket = Puluhan + " Puluh" + Satuan
            End If
        End If
End Select

3. Untuk tiga digit

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s

%d blogger menyukai ini: