Hadis al – Bukhari

Orang terkuat bukanlah pegulat. Tapi, orang yang bisa mengontrol dirinya saat marah.

Ibnu Taymiyyah

Jangan terlalu bergantung pada siapapun di dunia ini. Karena bayanganmu saja akan meninggalkanmu di saat gelap.

Ali bin Abi Thalib

Jangan mengharapkan persahabatan dari mereka yang tak mengharapkan bersahabat denganmu.

Imaam Ibn-ul-Qayyim

Perbuatan baik tanpa disertai ketulusan sama seperti menambahkan kotoran ke dalam air dan memanggulnya. Terasa memberatkan dan tidak memberi manfaat apapun pada yang memikulnya.

Minggu, 10 Desember 2017

Program Koreksi pada QBASIC

Pada kesempatan kali ini, gua akan membuat program koreksi dengan Tema Kandungan Asam yang kita gunakan dalam kehidupan sehari-hari. Kalau berbicara masalah Asam pasti itu selalu terikat dengan pelajaran Kimia, yah bisa dibilang begitu. Tapi sekarang kita hanya akan membuat program sederhana dulu.

Berikut Codingannya :

CLS
COLOR 22
PRINT "________________________________________________________________________________"
COLOR 12
PRINT ""

Sabtu, 09 Desember 2017

Mencari rata-rata pada QBASIC

Postingan kali ini gua akan membuat program/codingan mencari rata-rata nilai pada QBASIC. Program ini bisa juga membantu guru untuk mencari rata-rata nilai siswanya.

Contoh Soal :
1. Dari 4 penilaian, seseorang dikatakan berprestasi baik bila rata-ratanya lebih besar dari 80, berprestasi cukup bila rata-ratanya antara 60 sampa dengan 80 dan buruk bila rata-ratanya 60 atau kurang. Hendak ditentukan kriteria seseorang.

Program/codingannya seperti ini:

REM HASIL UJIAN SMA ADABIAH
DIM X AS STRING
GOTO 10
10 CLS

Searching Deret pada QBASIC

Kali ini gua akan membuat Program Searching dengan soal deret Aritmatika, jadi kita bisa mencari bilangan Aritmatika dalam program ini.

Jadi Programnya seperti ini :

REM BILANGAN ARITMATIKA
CLS
PRINT "________________________________________________________________________________"
PRINT ""
PRINT "==================   SELAMAT DATANG DI APLIKASI ARSITEKTUR  ===================="
PRINT ""