Cara mengurutkan angka genap di qbasic

Disini saya akan menjelaskan tentang cara mengurutkan angka genap di qbasic, yaitu dengan STATEMENT MOD. oke langsung saja



#Perhatian Sebaiknya tidak langsung mengcopy kodingan di bawah ini, agar tangan, dan pikiran bisa lebih mengerti dan terbiasa dengan menulisakan kodingan.  jangan asal copy paste :D hhehe






CODE: 
CLS
FOR i = 1 TO 100
    IF i MOD 2 = 0 THEN             'jika ingin memunculkan angka ganjil tinggal ganti 0 menjadi 1
        PRINT i;
    ELSE GOTO 50
    END IF
50 NEXT

OUTPUT: 








Keterangan:
tanda ' : artinya kata " jika ingin memunculkan angka ganjil tinggal ganti 0 menjadi 1" di nilai sebagai komentar dan tidak di baca oleh kompailer sebagai kodingan.
Statement MOD: statement ini di gunakan untuk mendapatan hasil sisa bagi dari i 1 sampai 100 di bagi 2. jika habis di bagi 2 maka angka itu akan di print/di cetak. jika tidak kompailer akan menuju nomor 50 yaitu next.


terimakasih telah membaca