Dalam perbaikan

maaf….blog ini sedang dalam masa perbaikan dan pengembangan

Program memilah bilangan

Program memilah bilangan ini adalah program yang digunakan untuk memilah suatu bilangan. contohnya bilangan 7654 akan dipilah menjadi ribuan:7000, ratusan:600, puluhan:50, satuan: 4.  Berikut codingnya:

Dim bil As Double
Dim i As Integer
Dim j As Double

Private Sub Command1_Click()

Menampilkan Bilangan Fibonacci

Bilangan fibonacci adalah deret bilangan yang memiliki pola tertentu,yakni bilangan-bilangan yang ada dalam deret itu adalah hasil penjumlahan dari dua buah bilangan sebelumnya.  contohnya : 1 1 2 3 5 8 13…….. nah Disini saya menampilkan kode program dari program menampilkan deret fibonacci ini.  coding ini ditulis menggunakan Visual Basic 6.0.  berikut codingnya :

Dim a, b, c, n, i As Integer

Private Sub Command1_Click()
n = Text1.Text

Program Perkalian Matrix

Kali ini program perkalian matrix dibuat dengan program Visual Studio 6.0, berikut coding programnya :

#include<stdio.h>
#include<stdlib.h>

main()
{
int a[10][10],b[10][10],c[10][10];
int bar_a,kol_a,bar_b,kol_b;
int i,j,k;

Konversi Biner ke Desimal

Program konversi bilangan biner ke desimal ini dibuat menggunakan Visual Basic 6.0. berikut contoh codingnya:

Dim bil, jum, x, i, length As Integer

Private Sub Command1_Click()
jum = 0

Konversi Bilangan desimal ke Biner

Dalam program konversi bilangan desimal ke bilangan biner ini digunakan Visual Basic 6.0, dimana dalam penulisan codingnya cukup mudah untuk dilakukan. berikut contoh coding program konversi bilangan desimal ke bilangan biner.

Dim bil As Integer

Private Sub Command1_Click()
Text2.Text = ” “

bil = Text1.Text