karolusmalau@ymail.com
Soal
Di baca:
1.Nama
2.Gaji pokok
3.Jabatan
ketentuan:
1.gaji bersih=gaji pokok+ tunjangan - pajak
2.tunjangan
a.manajer=tunjangan = 40% dari gaji pokok
b.direktur=tunjangan = 50% dari gaji pokok
c.staff=tunjangan = 30% dari gaji pokok
3.pajak = 10% dari gaji pokok + tunjangan
4.tampilkan pajak,tunjangan,dan gaji bersih.
Source Code:
baca selengkapnya:
Source code
package menentukankelipatan;
import java.util.Scanner;
public class Main {
public static void main(String[] args) {
Scanner input=new Scanner(System.in);
System.out.println("Mengitung Bilangan Kelipatan");
System.out.println("----------------------------");
System.out.print("Tentukan bilangan yang akan di cari kelipatannya :");int angka=input.nextInt();
System.out.print("dari = ");int awal=input.nextInt();
System.out.print("sampai = ");int akhir=input.nextInt();
for(int i=awal;i<=akhir;i++ )
{
if(i%angka==0)
{
System.out.print(i+",");
}
}
}
}
import java.util.Scanner;
public class Main {
public static void main(String[] args) {
Scanner input=new Scanner(System.in);
System.out.println("Mengitung Bilangan Kelipatan");
System.out.println("----------------------------");
System.out.print("Tentukan bilangan yang akan di cari kelipatannya :");int angka=input.nextInt();
System.out.print("dari = ");int awal=input.nextInt();
System.out.print("sampai = ");int akhir=input.nextInt();
for(int i=awal;i<=akhir;i++ )
{
if(i%angka==0)
{
System.out.print(i+",");
}
}
}
}
Contoh Keluaran:
run:
Mengitung Bilangan Kelipatan
----------------------------
Tentukan bilangan yang akan di cari kelipatannya :7
dari = 1
sampai = 50
7,14,21,28,35,42,49
Kali ini saya akan menerangkan pembuatan program peminjaman.Bisa di katakan sebuah koperasi kecil tapi memang belum di lakukan penyimpanan ke database.Program ini hanya menunjukkan bagaimana menghitung total pembayaran bagi yang melakukan peminjaman dan di kenakan bunga tiap bulannya.
Sebagai ketentuannya yaitu:
1.Setiap bulannya dikenakan bunga 3%.
2.Bagi yang melakukan peminjaman antara 12 sampai 18 bulan, maka diberikan diskon 2 bulan(tidak dikenakan bunga).
3.Bagi yang melakukan peminjaman lebih besar dari 18 bulan, maka diberikan diskon 3 bulan(tidak dikenakan bunga).
4.Untuk peminjam lebih kecil dari 12 tidak diberikan diskon.
Sekarang kita mulai untuk membuat programya.
Pertama : Buatlah tampilan seperti gambar berikut!
- 5 buah Label digunakan untuk judul, No.Peminjam, Nama Peminjam, Lama Peminjam, dan Jumlah Pembayaran.
- 4 buah TextBox digunakan untuk No.Peminjam, Nama Peminjam, Jumlah Pinjaman dan Jumlah Pembayaran.
- 1 buah ComboBox yang di gunakan untuk pemilihan lama peminjaman.
- 4 buah CommandButton digunakan untuk Hitung, Ulang, Keluar dan Laporan.
Berikut ini adalah langakah-langak pembuatan kalkulator sederhana menggunakan bahasa pemrograman Visual Basic 6.0.
Langkah-langkahnya:
Pertama : buat tampilan seperti berikut dengan ketentuan
Label 1 buah (hanya untuk judul saja)
Text 2 buah sebagai input nilai.
Common Button 7 buah digunakan untuk operator aritmatika dan tombol fungsi keluar.
Buka page source code, lalu tuliskan source code berikut.
Private Sub Command1_Click()
Text2.Text = Val(Text1.Text) + Val(Text2.Text)
Text1.Text = ""
Text1.SetFocus
End Sub
Private Sub Command2_Click()
Text2.Text = Val(Text1.Text) - Val(Text2.Text)
Text1.Text = ""
Text1.SetFocus
End Sub
Private Sub Command3_Click()
Text2.Text = Val(Text1.Text) / Val(Text2.Text)
Text1.Text = ""
Text1.SetFocus
End Sub
rivate Sub Command4_Click()
Text2.Text = Val(Text1.Text) * Val(Text2.Text)
Text1.Text = ""
Text1.SetFocus
End Sub
rivate Sub Command5_Click()
Text2.Text = Val(Text1.Text) ^ Val(Text2.Text)
End Sub
Private Sub Command6_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
Private Sub Command7_Click()
End
End Sub
Demikian program sederhana untuk membuat kalkulator sederhana.