Minggu, 08 Desember 2013

Program untuk menampilkan hasil ke listview untuk kasus Perhitungan Penjualan Barang


Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Kode.Items.Add("TS001")
        Kode.Items.Add("TS002")
        Kode.Items.Add("VG001")
        Kode.Items.Add("VG002")
        rancangan_table()
    End Sub



    Private Sub Kode_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Kode.SelectedIndexChanged

        Dim x As String
        x = Microsoft.VisualBasic.Left(Kode.Text, 2)
        If x = "TS" Then
            Merk.Text = "Toshiba"
            x = Microsoft.VisualBasic.Right(Kode.Text, 3)
            If x = "001" Then
                Nama.Text = "Flashdisk 4GB"
           

Sabtu, 16 November 2013

Membuat Form Nilai Mahasiswa

Listing Program :

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        NPM.Items.Add("12110982")
        NPM.Items.Add("12110040")
        NPM.Items.Add("12113456")
        NPM.Items.Add("12118890")
        NPM.Items.Add("12113435")

        KDosen.Items.Add("D001")
        KDosen.Items.Add("D002")
        KDosen.Items.Add("D003")
        KDosen.Items.Add("D004")
        KDosen.Items.Add("D005")

        Kodematkul.Items.Add("M001")
        Kodematkul.Items.Add("M002")
        Kodematkul.Items.Add("M003")
        Kodematkul.Items.Add("M004")
        Kodematkul.Items.Add("M005")

        Dim i As Integer
        For i = 100 To 1 Step -1
            Nhadir.Items.Add(i)
            NT.Items.Add(i)
            NU.Items.Add(i)
            NUS.Items.Add(i)
        Next i

    End Sub

    Private Sub NPM_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NPM.SelectedIndexChanged
        Select Case NPM.Text

Minggu, 30 Juni 2013

Informasi Penjualan Menggunakan Bahasa C\C++

Listing Program:

#include"stdio.h"
#include"conio.h"
void main()
{
int i,kode[15],jumlah[15],jumdata=5;
char*produk;
float harga,total,disc,pembayaran;

printf("\nInput Data Penjualan");
for(i=0;i  <jumdata; i++){
    printf("\nKode Produk :"); scanf("%d",&kode[i]);
    printf("\nJumlah Produk :"); scanf("%d",&jumlah[i]);
}
clrscr();
printf("\nInformasi Penjualan Produk");
printf("\n-------------------------------------------------------------------------------");
printf("\nNo Kode  Produk                  Harga   Jumlah    Total    Discount Pembayaran");
printf("\n-------------------------------------------------------------------------------");
for(i=0; i  <jumdata;i++){
    if(kode[i]==1){
          produk="TV"; harga=2000000;
     }else if(kode[i]==2){
          produk="DVD"; harga=650000;
     }else if(kode[i]==3){
          produk="CD ROOM"; harga=450000;
     }
     total=harga*jumlah[i];
     if(total> 2000000)disc=0.1*total; else
     if(total> 4000000)disc=0.2*total;
     pembayaran=total-disc;
     gotoxy(1,6+i);printf( "%i   %d     %s  ",i+1,kode[i],produk);
     gotoxy(30,6+i);printf("%10.0f   %i   %10.0f%10.0f%10.0f"  ,harga,jumlah[i],total,disc,pembayaran);
     }
     printf("\n--------------------------------------------------------------------------------");
}

Hasil Program:















Rabu, 05 Juni 2013

SEMUANYA TENTANG VIRUS KOMPUTER

Cara Virus Komputer Bekerja


Virus komputer: Sebuah kode komputer yang mampu "berbiak dengan sendirinya" yang menempelkan sebagian atau seluruh kodenya pada file atau aplikasi, dan mengakibatkan komputer Anda melakukan hal-hal yang tidak Anda inginkan.

Virus-virus komputer merupakan penyakit umum dalam dunia teknologi modern. Mereka dapat menyebar dengan cepat melalui jaringan komputer yang terbuka seperti Internet, dan mengakibatkan kerugian hingga milyaran dolar dalam waktu singkat. Lima tahun yang lalu, peluang untuk terjangkiti sebuah virus dalam periode 12 bulan adalah 1 berbanding 1000; sekarang perbandingan itu naik drastis hingga 1 berbanding 10. Statistik vital dari virus:

· Virus-virus masuk ke dalam sistem Anda melalui
e-mail, download, floppy disk yang terinfeksi, atau (kadang-kadang) oleh hacking.
· Dari definisinya, sebuah virus harus dapat melakukan "pembiakan sendiri" (alias membuat kloning atau salinan dari dirinya sendiri) untuk dapat menyebar.
· Saat ini terdapat ribuan jenis virus, tetapi hanya sedikit yang ditemukan "di belantara" (berkeliaran, tak terdeteksi, di dalam jaringan) karena sebagian besar dari virus yang dikenal lahir dari laboratorium, yang merupakan varian dari virus "liar" yang banyak terdapat di dunia.
· Akibat yang ditimbulkan virus bervariasi, mulai dari yang menjengkelkan hingga yang sangat merusak, akan tetapi virus yang paling sederhana pun memiliki kecenderungan untuk merusak karena adanya bug pada kode komputer mereka (karena programmer virusnya sangat ceroboh atau memang punya niat jahat).
· Software antivirus yang ada di pasaran saat ini dapat mendeteksi hampir semua jenis virus yang ada, tetapi harus diupdate secara reguler untuk menjaga keefektifannya.

Sebuah virus hanyalah sebuah program komputer. Seperti

PROGRAM KASIR SEDERHANA DENGAN JAVA

Listing Program


/*
 * To change this template, choose Tools | Templates
 * and open the template in the editor.
 */
package penjualan;
/**
 *
 * @author yudo
 */
import java.util.Scanner;
public class Penjualan {
    public static void main(String[] args) {
         int jlh_data,pilihan,total,bayar,total1,harga = 0;//deklarasi integer
    
        String namamakanan;
        Scanner input = new Scanner(System.in);
        System.out.println("==================");//mencetak nilai dari objek
        System.out.println("===Menu Makanan===");//mencetak nilai dari objek
        System.out.println("| 1. Mie Ayam     |");//mencetak nilai dari objek
        System.out.println("| 2. Nasi Goreng  |");//mencetak nilai dari objek
        System.out.println("| 3. Mie Goreng   |");//mencetak nilai dari objek
        System.out.println("| 4. Mie Rebus    |");//mencetak nilai dari objek
        System.out.println("==================");//mencetak nilai dari objek
        System.out.print("Silahkan pilih yang anda pesan : ");//mencetak nilai dari

PENGERTIAN BAHASA PEMROGRAMAN

PENGERTIAN BAHASA PEMROGRAMAN 


Bahasa pemrograman (programming language). apa itu? bahasa pemrograman adalah suatu komando atau perintah yang dibuat manusia untuk membuat komputer menjadi memiliki fungsi tertentu. bahasa pemrograman ini adalah suatu susunan aturan penulisan (sintaks) yang membentuk kode kode yang kemudian akan diterjemahkan oleh program kompiler menjadi bahasa rakitan (assembly) dan terus diolah hingga dimengerti oleh mesin. Komputer hanya mengerti bahasa mesin. menurut tingkat kedekatannya bahasa pemrograman ( programming language) terdiri dari

bahasa mesin. yaitu bahasa yang digunakan untuk memprogram komputer dengan menggunakan kode semacam kode biner misalnya.00100001010100100
Bahasa Tingkat Rendah, atau dikenal dengan istilah bahasa rakitan (bah.Inggris Assembly), yaitu memberikan perintah kepada komputer dengan memakai kode-kode singkat (kode mnemonic), contohnya MOV, SUB, CMP, JMP, JGE, JL, LOOP, dsb
Bahasa Tingkat Menengah, yaitu bahasa komputer yang memakai campuran instruksi dalam kata-kata bahasa manusia (lihat contoh Bahasa Tingkat Tinggi di bawah) dan instruksi yang bersifat simbolik, contohnya {, }, ?, <<, >>, &&, ||, dsb.
5. Bahasa Tingkat Tinggi, yaitu bahasa komputer yang memakai instruksi berasal dari unsur kata-kata bahasa manusia, contohnya begin, end, if, for, while, and, or, dsb 


sebagian besar bahasa pemrograman adalah bahasa tingkat tinggi. bahasa tingkat tinggi adalah bahasa pemrograman yang memiliki struktur dan kemiripan seperti bahasa menusia ya itu bahasa inggris. contoh bahasa pemrograman adalah PASCAL yang kita pelajari di situs pascal ini. sementara bahasa tingkat menengah misalnya bahasa C..

saat ini banyak bahasa pemrograman yang ada di dunia. masing masing punya kelebihan dalam kemudahan mempelajari dan merancangnya. diantara bahasa pemrograman yang populer antara lain

FORTAN
 FORTAN ( formula translation). pertama kali dikembangkan pada tahun 1956 oleh Jhon Backus di IBM. ditujukan untuk mempermudah pembuatann aplikasi matematika , ilmu pengetahuan dan teknik. FORTAN merupakan bahasa pemrograman tingkat tinggi yang pertama ada. keunggulan fortan terletak pada dukungan untuk menangani perhitungan , termasuk bilangan kompleks. Kelemahan bahasa ini adalah

Selasa, 04 Juni 2013

Input Harga Penjualan dengan Program pascal

Merubah Program Input Penjualan dari C++ ke bahasa Pascal

Listing Program:

uses crt;
var
   kd, jlh    : integer;
   hrg, total : longint;
   nama       : string[12];
begin
clrscr;
       writeln ('INPUT HARGA  PENJUALAN');
       writeln ('======================');
       writeln;
       write   ('Kode          : ');readln(kd);
       if kd = 1 then
         begin
           nama := 'Televisi';
           hrg  := 1750000;
         end
       else if kd = 2 then
         begin
           nama := 'DVD';
           hrg  := 650000;
         end
       else
         begin
           nama := 'CD-ROM';
           hrg  := 450000;
         end;
       writeln ('Nama          : ',nama);
       writeln ('Harga         : Rp ',hrg);
       write   ('Jumlah        : ');readln(jlh);
       total := hrg * jlh;
       writeln ('Total harga   : Rp ',total);
       writeln;
       writeln ('Terima kasih');
       readln;
end.

Hasil Program:




Minggu, 02 Juni 2013

hasil perulangan

script:

#include "iostream.h"
#include "conio.h"
void main()
{
int i,masukkan,hasil=1;
clrscr();
cout<<"Input Nilai:";cin>>masukkan;
for(i=1;i<=masukkan; i++)
{
if (i==masukkan)
cout<<i;
else
cout<<i<<"*";
hasil=hasil*i;
}
cout<<"="<<hasil;
}



hasil:


Senin, 20 Mei 2013

Artikel Tentang Mesran[dot]Net

Assalamu'alaikum.wr.wb.
Mungkin belajar blog bukan kali pertama buat saya, namun saya terbilang masih newbie....
sedikit dan banyak nya saya pelajari cara-cara membuat atau menambah kan sesuatu yang belum saya ketahui dari blog bapak dan mungkin lebih banyak belajar dari blog bapak dibanding belajar sistem sendiri. 

Dan bapak selaku Dosen pengajar saya dan Ketua STMIK Budidarma Medan. 
Web dan blog bapak cukup membantu menunjang proses belajar saya dalam banyak hal,, mulai dari belajar bahasa pemrograman,meng-edit read more di blog,agar blog terindeks di google dan masih banyak lagi yang lainnya dan tidak sedikit yang saya pelajari dari web bapak. 
Mungkin belum begitu banyak yang saya pelajari namun
bagi saya Web dan Blog bapak sangat membantu saya. 
Sangat bagus dan mudah-mudahan Mesran[dot]Net

Sabtu, 04 Mei 2013

Indonesia Protes Pembukaan Kantor OPM di Inggris

Menteri Luar Negeri Marty Natalegawa saat berkunjung ke redaksi VIVAnewsVIVAnews - Indonesia melalui Kementerian Luar Negeri memprotes keras dan menyatakan keberatan atas dibukanya kantor Organisasi Papua Merdeka (OPM) di Oxford, Inggris pada 28 April lalu. Pemerintah mengaku telah menginstruksikan Duta Besar Indonesia di Inggris, Hamzah Thayeb, untuk menyampaikan hal itu.

Hal ini disampaikan Kemlu RI dalam keterangan pers

Sarang Semut Asli Papua


Pusat Informasi Dan Penjualan Sarang Semut Asli Papua

Sarang semut online dot com Suplier Sarang Semut Asli Dari Papua adalah sebuah website online store yang didedikasikan untuk mengenalkan dan menyebarkan informasi tentang sarang semut papua yang asli.

 DAPATKAN SARANG SEMUT ASLI PAPUA DENGAN HARGA TERMURAH !!!

SILAHKAN BANDINGKAN DENGAN HARGA DARI TOKO ONLINE LAINNYA
KEASLIANNYA DIJAMIN 100% KARENA KAMI KIRIM LANGSUNG DARI PAPUA
SEGERA PESAN DAN HUBUNGI KAMI :
NO HP : 0813 – 444 – 000 – 76
Kami merupakan kumpulan anak muda yang berdomisili di Provinsi Papua. Dengan adanya website www.sarangsemutonline.com ini harapan kami, masyarakat akan lebih banyak tahu dengan apa yang dinamakan tumbuhan sarang semut.

Banyak manfaat dan khasiat tumbuhan sarang

Minggu, 10 Maret 2013

ARTI VARIABEL


ARTI VARIABEL

Variable adalah suatu pengenal (identifier) yang digunakan untuk mewakili suatu nilai tertentu di dalam proses program. Nilai dari suatu variabel bisa diubah-ubah sesuai kebutuhan. Nama dari suatu variable dapat ditentukan sendiri oleh pemrograman dengan aturan sebagai berikut: 
1. Terdiri dari gabungan huruf dan angka dengan karakter pertama harus berupa huruf. Bahasa 
2. C++ bersifat case-sensitive artinya huruf besar dan kecil dianggap berbeda. Jadi antara nim,NIM dan Nim dianggap berbeda. 
3. Tidak boleh mengandung spasi 
4. Tidak boleh mengandung symbol-symbol khusus, kecuali garis bawah(underscore). Yang termasuk symbol khusus yang tidak diperbolehkan antara lain: $,?,%,#,!,&,*(,),-,+,= dsb 
5. Panjangnya bebas, tetapi hanya 32 karakter pertama yang terpakai. 

Contoh pendeklarasian variabel yang