PASCAL : program konversi angka ke huruf

Oleh -

{hell code!}

awalnya dosen struktur data gua (sebut saja mawar) nyuruh bikin program buat program konversi angka ke huruf. bukan tugas, sekadar berlatih aja. terlintas dipikiran gua "gampang nih" . contoh ...

input : 1234
output : seribu dua ratus tiga puluh empat

sejam... dua jam... sehari... dua hari... hampir seminggu gak pecah-pecah. udah "oprek" sana sini gak ketemu. akhirnya ketemu titik terang.
gak kepikiran yaa...
jelas... luar biasa dibanding program alat tulis kantor sebelumnya. buat gua ini lebih "mikir" .
function? gak ngerti. ya.. balik ke prosedur. sekarang algoritma nya.

gua ambil bilangan pecahan terbesarnya. misal 12345. berarti bisa dipecah jadi 10000 + 2000 + 300 + 40 + 5

12345 div 100 = 1, 2000 div 1000 = 2, 300 div 100 = 100, 40 div 10 = 5, dan sisanya 5.

sekarang udah didapat angka angkanya. tinggal diconvert jika 1 maka cetak "satu". dst. yaa... buat yang bisa baca program. gua open source deh biar gak pusing :-p
pascal oh turbo pascal
kenapa harus kenal ini lagi? kenapa harus console lagi. GUI nya mana ?!
mau gak mau... terima kenyataan.

terima kasih Allah sudah memberikan jalan hebat ini. Usaha = hasil. walaupun hasilnya belom maksimal dan cuma bisa convert maksimal 4 digit angka a.k.a "ribuan". ini kerja keras sendiri (agak berantakan dan masih labil -_- )

input range : 0 - 19999



"solve it like a game. it can be fun!"

CONTOH OUTPUT :

Comments

  1. UnknownNovember 3, 2012 at 11:08 PM

    klo inputan yang mengandung 11-19
    blom pas gann..
    ada solusi??

    ReplyDelete
  2. Arick AnjasmaraNovember 4, 2012 at 8:41 PM

    contoh input angka berapa yang gak bisa? ane lancar aja tuh

    ReplyDelete
  3. AnonymousDecember 27, 2012 at 10:53 PM

    BRO MW TANYA
    KLW CONCAT FUNGSI NYA UNTUK APA YA?
    TRIMS...

    ReplyDelete
  4. Arick AnjasmaraDecember 28, 2012 at 12:10 AM

    concat gunanya untuk gabung 2 string jadi 1 string

    ReplyDelete
  5. AnonymousJanuary 19, 2013 at 7:08 PM

    maksih broo,,,,
    aku jga ada tgas seperti ini,,,
    tapi menggunakan function.....

    ReplyDelete
  6. Arick AnjasmaraJanuary 20, 2013 at 4:04 PM

    silahkan otak atik bro :)

    ReplyDelete

Post a Comment

Popular posts from this blog

cheat plants vs zombies menggunakan cheat engine

Oleh -
Image
plants vs zombies... siapa sih yang gak tau mini games dari popcap ini? ya keliatannya sih gampang ya. tanam tumbuhannya, dan otomatis akan menembak zombies yang berjalan. tapi coba deh main survival terakhir, pasti baru sampe level 10 langsung die :p makanya, di sini gua mau ngasih cheat yang berguna untuk plants vs zombies. alat dan bahan yang diperluin cuma : -game plants vs zombies. DOWNLOAD PLANTS VS ZOMBIES DI SINI -cheat engine. DOWNLOAD CHEAT ENGINE DI SINI ada 4 cheat yang bakal gua jelasin di sini 1. INFINITY SUN (matahari gak abis abis) 2. NO DELAY (gak perlu nunggu nunggu refill tanaman yang abis dipakai) 3. CHEAT MONEY (uang yang banyak dan gak habis habis) 4. TREE OF WISDOM CHEAT (pohon zen garden yang sampe tinggi) oke mulai aja... I. CHEAT INFINITY SUN (matahari gak abis abis) PLANTS VS ZOMBIES buka plants vs zombies nya setting plants vs zombies nya di options , full screen nya jangan di centang biar gampang ngerjainnya buka juga cheat engine
Selengkapnya

STRAWBERRY PROLOG: Membuat Garis (Line)

Oleh -
Image
sehubungan dengan tugas tugas yang terlempar dari laboratorium teknik informatika. mata praktikum pengantar kecerdasan buatan (PKB). harus menggunakan strawberry prolog Download Strawberry Prolog: download strawberry prolog Password: langkah 1 untuk membuka aplikasi strawberry prolog, download file di atas kemudian ekstrak rar nya, pilih strawberry prolog.exe setelah muncul tampilan pertama, klik file kemudian new, pilih yang strawberry project, kemudian klik OK langkah 2 ketikkan code berikut pada window kosong yang baru anda buat ?-window(G_namaWindow, _, window1(_), "Ini window pertamaku" , 100,200,300,400). ?-window berarti membuat window baru. G_namaWindow adalah nama window tersebut window1(_) adalah fungsi yang nantinya akan dibuat “ini window pertamaku” adalah judul dari window yang akan muncul 100, 200, 300, 400 adalah koordinat dari window yang akan muncul, perhatikan gambar di bawah langkah 3 untuk melihat hasilnya, pilih RUN di menu bar
Selengkapnya

DOWNLOAD: Emulator PlayStation 1 (PS1) for Windows

Oleh -
Image
bishi bashi (pic source: google.com) flashback bersama playstation 1. Game-game seru seperti Winning Eleven, Crash Team Racing (CTR), Bishi Bashi, Tamiya (lets go eternal wings) pernah gua jumpa semasa kecil dulu. Apalagi dulu, susah banget beli playstation 1 karena mahal, yang ada malah rental PS (baca: playstation), itupun masih jarang adanya. Jadi kangen sama masa masa itu. Mau main game itu lagi tapi harus keluar uang buat beli console nya *mental mahasiswa* akhirnya, cari aja solusi di google. Ini dia emulator Playstation 1. namanya ePSXe. Emulator ini yang bisa menyelamatkan masa kecil gua (mungkin kalian juga). gua jadi bisa main game ps 1 tanpa harus modal banyak. Tampilan Utama Emulator Playstation 1 (ePSXe 1.7.0) download ePSXe 1.7.0: http://www.mediafire.com/?2z4elio6j61qxmw  (10mb) password: arickanjass ePSXe ini ga perlu diinstall. ekstrak aja file yang udah didownload tadi dan muncul deh folder namanya  epsxe170 buka folder tersebut, dan buk
Selengkapnya