Program Pascal Membuat Kalkulator

“Struktur Dasar Program’’

Secara umum  struktur dasar  yang diperlukan sebuah program adalah :

• Deklarasi variabel yang dipakai
• Modul input
• Pengolahan data
• Serta modul output
  

Langkah Awal Membuat Program

Pembuatan program akan terasa lancar kalau kita melaksanakan urutan atau langkah pembuatan program seperti berikut :

1. Mendefinisikan Masalah.
Tips mendefinisikan masalah :

• Kumpulkan informasi masalah yang akan kita selesaikan dengan program yang dibuat.
• Analisa informasi yang didapat, kalau masih kurang ulangi mencari data pendukung.

2. Membuat Rumusan Masalah.
Dari data yang telah kita peroleh, buat rumusan masalahnya, caranya :

• Pahami data yang didapat.
• Kelompokan data.
  Katagorikan variabel data yang dipakai, data input yang diperlukan, data yang akan diproses, serta ouptput data yang diperlukan.
• Kemudian rancang alur program atau flowchart. Atau buat "pseudo code".

3. Implementasikan.
Setelah alur program kita susun secara logis dan terstruktur. Selanjutnya konversikan alur program kita ke bahasa pemograman. Tipsnya sebagai berikut :

• Pahami stuktur baku bahasa program yang kita pakai.
• Siapkan list kode / kamus dari bahasa program yang kita pakai.
• Pahami cara penulisan / penggunaan dari kode atau command yang kita pakai.
• Tes jalankan per modul. Ini untuk mempermudah kita mencari dan memperbaiki error yang muncul.
  
  

4. Dokumentasi. 

Dokumentasikan program yang sudah kita buat. Dokumentasi ini penting untuk perbaikan program yang kita buat dimasa akan datang. Simpan semua dokumen pendukung dan source list.

Membuat Kalkulator Sederhana dengan Turbo PASCAL

Codingnya :
uses crt;
var
a,c,d : integer;
operator, z:char;
begin
repeat
clrscr;
Writeln('PETUNJUK:');
Writeln('1. Masukkan Angka Pertama');
Writeln('2. Masukkan Operator (+, -, /, *)');
Writeln('3. Masukkan Angka Kedua');
Writeln (‘-------------------------------‘);
Writeln('PERHITUNGAN: ');
Writeln (‘------------------------------‘);
Write('Masukkan Angka: '); readln(a);
write('Operator: '); readln(Operator);
write('Angka Kedua: '); readln(c);
case operator of
'+': d:=a + c;
'-': d:=a - c;
'/': d:=a div c;
'*': d:=a * c;
end;
writeln('Hasil: ',d);
writeln;
writeln (‘ By : Lenti Asita Sidauruk’);
writeln (‘Lenlee’);
writeln (‘Ady’);
writeln (‘Joe’);
writeln (‘Robin’);
writeln (‘Selly);
writeln;
Write('Hitung lagi? (y/n) '); readln(z);
until Upcase(z) <> 'Y';
end. 

Semoga Bermanfaat...... BLL_LBU <3 ^_^

Cara Menghubungkan Komputer dengan Jaringan Internet

Cara Menghubungkan Komputer dengan Jaringan Internet

1.      Melalui Jaringan

Untuk menghubungkan komputer dengan jaringan yang besar dapat digunakan jaringan yang lebih kecil yaitu LAN.cara penghubung komputer dengan internet melalui jaringan biasa digunakan untuk melayani pemakaian dengan jumlah yang banyak.contoh warnet,kampus,sekolah,perusahaan negeri maupun swasta dan lai-lain.

Sistem penghubung dengan jaringan adalah dengan menggunakan komputer sebagai server yang dihubungkan dengan penyedia  jasa layanan internet melalui telpon baik kabel maupun non kabel.Sistem jaringan ini memiliki keuntungan bahwa  biaya akses yang ditanggung akan lebih murah,karena biaya akses akan terbagi oleh banyaknya pemakai.

2.  Melalui saluran telepon langsung

Sistem sambungan yang lain adalah dengan dial up langsung,di mana modem langsung dihubungkan dengan jaringan telpon yang menghubungkan dengan jaringan internet. Kelebihan akses ini adalah memiliki jaringan yang luas.sedangkan kekurangannya adalah biaya akses yang relatif tinggi.

3.  Melalui GPRS

GPRS adalah singkatan dari General Pocket Radio Service.Jaringan ini merupakan gelombang radio sebagai penghubung Komputer dengan jaringan internet.dengan menggunakan gelombang radio sebagai penghubung komputer dengan jaringan internet.dengan mengunakan gelombang radio maka akses dengan GPRS ini memiliki kelebihan yaitu akses dapat dilaksanakan walupun alat komunikasi atau user bergerak.dalampenghitungan biaya akses didasarkan banyaknya data yang diakses tanpa dibatasi lamanya waktu akses.dan untuk dapat mengakses melalui GPRS hanya dilakukan komputer dan  telepon seluler yang dilengkapi fasilitas GPRS.Kekurangan dari GPRS    adalah untuk mendapatkan koneksi internet,kita harus melalukan setting tertentu pada ponsel,padahal setiap merk handphone dan operator seluler memilki cara tersendiri untuk mengaktifkan GPRS.

4.  Melalui WiFi (Wireless Fidelty)

WiFi adalah jaringan tanpa kabel yang mengunkan gelombang dengan frekuensi yang      tinggi(2.4GHz).untuk menggunakan WiFi kita harus memiliki notebook dan PDA yang dilengkapi dengan kartu WiFi.Kelebihan WiFi adalah memliki kecepata akses yang tinggi yaitu 11Mbps.Sedangkan kekurangan dari WiFi adalah pemakaian harus berada pada daerah yang memiliki sinyal WiFi (Daerah Hot Spot)

5.  Menggunakan TV Kabel

Kelebihan dari penggunaan jaringan TV kabel untuk akses internet adalah kita dapat melakukan akses internet setiap saat tanpa ada gangguan sepenuhnya jaringan telepon

Syarat aksess internet melalui TV kabel antara lain:

a.      Berlangganan dengan penyedia layanan TV kabel yang memiliki layanan internet

b.      Perangkat komputer standar yang dilengkapi dengan sistem operasi dan perangkat lunak lainnya yang mendukung akses internet.

c.       Menggunakan modem khusus yang dirancang untuk TV kabel.

Semoga Bermanfaat ya Sobat.. ^_^

Cara Setting IP Address Manual di Windows 7

Bagi kamu yang sedang kesulitan bagaimana cara untung memasukan IP (Internet protocol) di komputer mu. IP mungkin bisa diumpamakan dengan alamat, tanpa alamat kita tidak bisa mengetahui tempat tinggal sesorang, mungkin seperti itu gambar dari saya mengenai IP, tetapi hari ini saya tidaka akan menjelaskan tentang IPnya tetapi cara setting ip manual di windows 7.

Cara setting ip manual di windows 7 : 

1.  Klik Menu Start Pilih Control Panel 

     2. Klik Network and Sharing

     3. Klik change adapter Setting

      4. Pilih Network Lan anda seperti gambar dibawah ini, lalu klik kanan pilih propertis

      5. Klik Internet protocol version 4 TCP/IP

      6. Pilih Menu Use the Following ip address
          dan masukkan IP address,Subnet Mask dan Default Gateway anda

Cara cara setting koneksi internet

Koneksi Internet & P2P
OS : Windows Family
Modem : Huawei e220

Yang pertama, buka properties modem (Windows XP) (Gambar 1)


** Kalau ingin share ke WLAN, pilih dan arahkan ke interface WLAN (Gambar 1)
** Kalau ingin share ke LAN, pilih dan arahkan ke interface LAN (Gambar 1)

Kemudian, buka properties WLAN/LAN. (Gambar 2)


** Buat IP Static di Komputer Host (yang ditancepin modem). (Gambar 3)


Kalau share menggunakan LAN, tutorial berhenti pada gambar 3. Dan sekarang atur IP Client. Usahakan IP Client ada pada subnet yg sama (lihat gambar 3). Menggunakan IP Range 192.168.0.1, berarti client harus menggunakan subnet 192.168.0.X. Dan mengarahkan default gateway ke ip host, dalam contoh kali ini adalah 192.168.0.1

Gambar 4 (IP Client) :


Silakan konek 

Untuk yg WiFi, tinggal buat ad-hoc ajah, selebihnya sama dengan yang di atas  Nanti client nya konek ke ad-hoc yg udah di buat.
Internet Pake WIFI

Mungkin cara ini sudah basi…, tapi gak ada salahnya kalau saya tampilkan dalam kaskus tersayang ini. Kita dapat menggunakan satu buah line internet digunakan bersama-sama dengan laptop / PC yang telah dilengkapi dengan WIFI. Kebetulan saya mempunyai koneksi internet 3G, dan di rumah saya ada sebuah laptop dan satu buah PC yang telah memiliki Card Wireless. Koneksi 3G ini biasanya saya gunakan pada Laptop untuk berinternet, Pada saat yang bersamaan anak saya juga ingin menggunakan internet untuk mengerjakan tugas2 dari sekolahnya. Lalu saya coba untuk melakukan sharing internet di laptop saya agar dapat digunakan juga pada PC / Komputer yang digunakan anak saya. Dan saya coba utak-utak dilaptop pada Network connection, dan hasilnya saya dapatkan catatan2 sebagai berikut.

Setting share pada koneksi jaringan internet.
1. Jangan koneksikan dahulu internet, saya menggunakan 3G.
2. Klik Start – Control Panel – Network Connection.
3. Klik kanan Pada jaringan koneksi Internet (misl : Indosat 3G)
4. Klik Properties
5. Klik tab Advanced6. Pada bagian Internet Connection Sharing, beri tanda cetang (ceklist) pada Allow other network usert to connect through this computer’s Internet connection, Pilih Wireless Network Connection pada bagian Home Networking Connection.
7. Klik OK



Setting Jaringan Adhoc Computer to Computer (Peer to peer)1. Klik Start – Control Panel – Network Connection
2. Klik kanan pada Wireless Network Connection
3. Klik tab Wireless Connection


4. Klik tombol Add
5. Tentukan network name (SSID) : misalnya : Internet-3G, network Authentication : Open, Data Encription : Disable. Jangan lupa perhatikan beri tanda centang pada This is a computer to computer (adhoc) network, wireless access point are not used.


6. Klik OK
7. Klik OK

Koneksikan Komputer / Laptop kita yg sebagai Server Internet dan Pada Komputer Client yang belum terkoneksi Internet dengan cara :1. Koneksikan dahulu jaringan Internet kita.
2. Klik Start – Control Panel – Network Connection
2. Klik kanan pada Wireless Network Connection
3. Klik View Available Wireless networks


4. Maka di sana akan ditampilkan nama jaringan wirelessnya : contoh Internet-3G.5. Klik Connect.

Kalau kita cek IP pada jaringan Wireless komputer server internet, akan tertulis IP Addresss : 192.168.0.1 NetMask : 255.255.255.0



Kalau kita cek IP pada Jaringan Wireless komputer client, akan tertulis IP Address 192.168.0.? (?=angka 1 sd. 254). Net Mask : 255.255.255.0
koneksi Internet dari Wajanbolic 


Banyak yang menanyakan, apakah wajanbolic bisa digunakan oleh beberapa orang sekaligus? Jawabnya:bisa !! Wajanbolic bisa digunakan untuk banyak PC sekaligus.

Persiapannya :

1. PC yang akan ditunjuk sebagai “server” harus ada 1 port LAN atau LAN Card. Biasanya cpu atau laptop terkini sudah memiliki LAN internal. Kalo ga punya, beli aja, murah koq sekitar 60rb-an.
2. Yang kedua, jika yang mau ngeroyok koneksi lebih dari 1 PC, maka harus disediakan 1 buah LAN Switch dengan jumlah port yang mencukupi. Switch dengan 4 port kisarannya 120rb-an. Sudah cukup untuk 3 PC (1 port untuk server, 3 port untuk client). Kalau sharing hanya 2 PC tidak perlu switch.
3. Kabel UTP. Kalau menggunakan switch, kabel UTP bisa menggunakan UTP straight atau UTP cross. Jika sharing hanya 2 PC kabel UTP yang digunakan harus UTP cross.
4. Doa. Semoga tidak ada error pada Windows Anda (karena seringkali fitur Internet Connection Sharing Windows bertingkah laku aneh)

Okay, langkahnya :

1. Koneksikan wajanbolic dan pastikan status Local Area Connection wajanbolic tersebut sudah Connected dan bisa browsing ke Internet.
   
2. Klik ganda ikon Local Area Connection wajanbolic tersebut. Klik tombol Properties lalu pada window yang muncul klik Advanced. Centang Allow other network user to connect through this computer’s Internet connection. Pada Home networking connection pilihlah Local Area Connection. Klik OK untuk melanjutkan.
   
3. Sebuah window akan muncul. Artinya kurang lebih Windows akan menset IP Address Local Area Connection (LAN Card) menjadi 192.168.0.1. Klik tombol Yes. 
4. Klik tombol OK lalu klik tombol Close.

Untuk sharing 2 PC, cara instalasinya :

1. Siapkan kabel UTP cross dengan panjang yang mencukupi. Jika panjang lebih dari 50m disarankan untuk menggunakan UTP Belden USA orisinil.
2. Tancapkan ujung kabel UTP ke port LAN komputer server dan ujung satunya ke komputer client.
3. Cek settingan IP Address komputer server. Caranya klik Start > Run. Ketik cmd lalu tekan enter. Pada Window command prompt (latar belakang hitam) ketik ipconfig/all lalu tekan enter.
4. Perhatikan pada setting IP Address di bagian pertama muncul angka 192.168.0.1 dan pada bagian kedua muncul angka 192.168.44.12. Yang pertama adalah IP Address yang akan disharing atau istilah populernya IP Lokal, sedangkan yang kedua adalah IP Publik. Angka IP Publik yang muncul pada komputer Anda mungkin berbeda dengan gambar tsb. Sampai disini berarti Windows telah berhasil mengaktifkan Internet Connection Sharing. Oya, jangan lupa catat juga IP Address DNS Server yang muncul pada bagian kedua.
5. Beralih ke komputer client, disini Anda harus menset IP nya. Klik ganda pada ikon Local Area Connection-nya lalu klik tombol Properties.
6. Gulung scrollbar kebawah lalu klik Internet Protocol (TCP/IP) kemudian klik tombol Properties. Isilah IP Address, Subnet Mask, Default Gateway dan Preferred DNS server seperti terlihat pada gambar. Untuk Preferred DNS server angkanya harus sama dengan DNS Server yang telah Anda catat pada langkah 4 diatas.
   
7. Klik tombol OK lalu klik tombol Close
8. Ok, sekarang kita cek koneksi dari client ke server. Klik Start > Run lalu ketik cmd tekan enter. Ketik perintahping 192.168.0.1 tekan enter. Jika everything’s ok maka pada layar akan muncul Reply from 192.168.0.1…
9. Buka browser dan cobalah browsing dari PC client

Nah, untuk sharing beberapa PC, cara instalasinya mirip dengan diatas, bedanya kabel UTP dari PC server ditancap ke switch, dan kabel UTP PC client juga ditancap ke switch. Kemudian dimulai dari PC client pertama, settinglah IP nya seperti langkah 5 diatas. Ulangi untuk PC client berikutnya dengan IP Address berikutnya. Perhatikan ilustrasi dibawah ini :

IP Address server 192.168.0.1
IP Address PC client pertama 192.168.0.2
IP Address PC client kedua 192.168.0.3
PC client berikutnya nomor IP Address tinggal ditambah 1.

Semoga Bermanfaat ya sobat.. ^_^

Menghitung Luas Persegi dan Persegi Panjang Pemrograman C++

Program sederhana C++ menghitung luas dari persegi dan persegi panjang. Menggunakan software Borland C++ version 5.02 . Program disertai dengan pemilihan opsi pengerjaan. Untuk pemilihan opsi digunakan percabangan SWITCH-CASE.

Untuk penghitungan persegi hanya diperlukan variabel sisi yang diinisialisasikan dengan "s".

Dan persegi panjang dengan variabel panjang dan lebar yang diinisialisasikan dengan "p" dan"l"

Dan berikut source code untuk program tersebut :

#include<iostream.h>

#include<conio.h>

main()

{

  int luas,s,p,l,pilihan;

  cout<<"Program Luas Persegi dan Persegi Panjang\n";

  cout<<"[1] Pesegi\n";

  cout<<"[2] Persegi Panjang\n";

  cout<<"Masukkan Pilihan Anda = ";

  cin>>pilihan;

  switch(pilihan)

  {

    case 1 :cout<<"\n\nMenghitung luas persegi\n";

            cout<<"Masukkan sisi = ";

            cin>>s;

            cout<<"Rumus = S x S\n";

            luas=s*s;

            cout<<"Luas Persegi = "<<luas;

            break;

    case 2 :cout<<"\n\nMenghitung luas persegi panjang\n";

            cout<<"Masukkan panjang = ";

            cin>>p;

            cout<<"Masukkan lebar = ";

            cin>>l;

            cout<<"Rumus = P x l\n";

            luas=p*l;

            cout<<"Luas Persegi Panjang = "<<luas;

            break;

    default : cout<<"inputan salah";break;

  }

  getch();

}

Semoga bermanfaat,, dan jika masih ada yang belum lengkap supaya saudara mau saling melengkapi dan mengoreksi.. ^_^

Program Menghitung Luas dan Keliling Jajaran Genjang

"Program Menghitung keliling jajaran genjang"

Program menghitung_keliling_jajaran_genjang;

Uses WinCrt;

    Var

    sisi_horizontal,sisi_miring:real;

    keliling_jajaran_genjang:real;

Begin

writeln('masukkan nilai sisi_horizontal ,sisi_miring=');

readln(sisi_horizontal,sisi_miring);

keliling_jajaran_genjang:=2*(sisi_horizontal+sisi_miring);

writeln('keliling=',keliling_jajaran_genjang:4:2);

end.

Program menghitung_luas_jajaran_genjang;

Uses WinCrt;

    Var

    alas,tinggi:real;

    luas_jajaran_genjang:real;

Begin

writeln('masukkan nilai alas,tinggi=');

readln(alas,tinggi);

luas_jajaran_genjang:=alas*tinggi;

writeln('luas=',luas_jajaran_genjang:4:2);

end.

Terimakasih sudah berkunjung,semoga program ini bermanfaat untuk kita.

Jika ada yang tidak bisa dijalankan mohon saling melengkapi.. ^_^