Kamis, 15 Desember 2011 0 komentar

Contoh Program Terapan

CONTOH PROGRAM MENGHITUNG NILAI PHI
program menghitung_phi;
uses wincrt ;
var
   hasil :real;

begin
     hasil:=22/7;
     writeln(hasil);
end.
1 komentar

Contoh Program Matrik

CONTOH PROGRAM BENTUK MATRIK

program matriks;
uses wincrt;
var
x:array[1..100,1..100] of integer;
p,l,i,j:integer;
begin
write('banyaknya kolom = '); read(p);
write('banyaknya baris = '); read(l);
 writeln('tulis kebawah sebanyak baris kali kolom');
for i:=1 to l do
for j:=1 to p do
readln(x[i,j]);
writeln('bentuk matriknya : ');
for i:=1 to l do
begin
for j:=1 to p do
write(x[i,j],' ');
writeln;
end;
end.

0 komentar

Contoh Program Statistika

CONTOH PROGRAM MEAN

program rata_rata;
uses wincrt;
var
i,n: integer;
x,sum,mean:real;
begin
write('banyaknya data = ');
readln(n);
sum:=0;
for i:=1 to n do
begin
writeln('data ke',i,'=');
readln(x);
sum:=sum+x;
end;
mean:=sum/n;
writeln('rata-rata = ',mean:9:4);
end.


0 komentar

Contoh Program Konversi

CONTOH PROGRAM KONVERSI BINER KE ANGKA
Program konversi_biner;
uses wincrt;
var   
     desimal,b,sisa,biner:integer;
begin
     write (' angka biner '); readln (biner);
    b:=0;
      repeat 
     sisa:= biner mod 10;
     biner:= biner div 10;
     if (b=0) then
     b:=1
     else
     b:=b*2;
    desimal:= desimal+sisa*b;
     until biner = 0;

      write ('desimal=', desimal );
    
end.

6 komentar

Contoh Program Faktorial

CONTOH PROGRAM FAKTORIAL PAKAI FOR TO DO

program faktorial;
uses wincrt;
var
i,n,f:integer;
begin
readln(n); f:=1;
for i:=1 to n do
    begin
    f:=f*i;
    end;
    writeln(n,' faktorial = ',f);
end.

0 komentar

Contoh Program Deret

CONTOH PROGRAM DERET GENAP

program deret_genap;
uses wincrt;
var
i:integer;
begin
i:=2; write(2,' ');
repeat
i:=i+2; write(i,' ');
until i=10;
end.
Rabu, 14 Desember 2011 0 komentar

Contoh Program Bentuk Segitiga

CONTOH PROGRAM SEGITIGA SATU KE SEPULUH

program segitiga_satu_ke_sepuluh;
uses wincrt;
var
n,i,j:integer;
begin
n:=1;
for i:=1 to 4 do
    begin
         for j:=1 to i do
         begin
         write(n,' ');
         n:=n+1;
         end;
         writeln(' ');
         end;
end.

8 komentar

Contoh Program Bentuk Bintang

CONTOH PROGRAM BERBENTUK BINTANG

program bintang_segitiga;
uses wincrt;
var
a,b,c: integer;

begin
readln(a);
for b:=a downto 1 do
begin
for c:=1 to a do
write('*');
writeln;
a:=a-1;
end;
end.


0 komentar

Contoh Program Dasar

CONTOH PROGRAM PENJUMLAHAN

program penjumlahan_sederhana;
uses wincrt ;
var
   a,b,hasil :integer;

begin
 write('a= '); readln(a);
 write('b= '); readln(b);  
 hasil:=a+b;
 writeln('a + b = ',hasil);
end.
Selasa, 13 Desember 2011 0 komentar

Materi Program Pascal BAB V


BAGIAN V
ARRAY
A. Array
Array (larik) menyatakan tipe data terstruktur yang berupa kumpulan elemen-elemen
dengan tipe data yang sama. Tipe Array dapat ditulis sebagai berikut:
Array [Indeks_1,…,Indeks_n] of Tipe_Dasar
Array Dimensi Satu
Array berdimensi satu merupakan array dengan ciri memiliki tipe indeks hanya satu buah.
Contoh deklarasi variabel dengan tipe array berdimensi satu:
VAR X : ARRAY[1..10] of Integer;
0 komentar

Materi Program Pascal BAB IV


BAB IV
PERNYATAAN PERULANGAN
Pernyataan perulangan adalah pernyataan yang akan menjalankan pernyataan yang
mengikutinya secara berulang sampai syarat tertertentu terpenuhi. Ada 3 buah pernyataan
perulangan, yaitu FOR, WHILE dan REPEAT.
A. Statement FOR
Statement FOR adalah suatu perintah yang berfungsi untuk melakukan proses
pengulangan, dimana jumlah pengulangannya sudah diketahui. Bentuk dari statement
FOR adalah:
FOR {Variabel} := {Nilai Awal} TO {Nilai Akhir} DO
0 komentar

Materi Program Pascal BAB III


BAB III
PERNYATAAN BERSYARAT
Pernyataan bersyarat adalah pernyataan yang akan menjalankan pernyataan yang
mengikutinya sesuai dengan syarat tertertentu. Ada 2 buah pernyataan bersyarat, yaitu IF
dan CASE.
A. Pernyataan IF

Bentuk pernyataan IF:
IF <syarat logika> THEN <Pernyataan>;

IF <syarat logika> THEN <Pernyataan-1>

ELSE <Pernyataan-2> ;

Jika syarat logika bernilai Benar maka yang akan dijalankan adalah pernyataan yang
mengikuti THEN, dan sebaliknya jika syarat logika bernilai Salah maka yang akan
dijalankan adalah pernyataan yang mengikuti ELSE. Jika pernyataan yang mengikuti
THEN atau ELSE lebih dari satu maka harus diawali oleh Begin dan diakhiri oleh End.
Statement End sebelum ELSE tidak boleh ada tanda titik koma (;).
IF <syarat logika> THEN begin
<Pernyataan-11>;
<Pernyataan-12>;
.
.
<Pernyataan-1n>;
end
ELSE begin
<Pernyataan-21>;
<Pernyataan-22>;
.
.
<Pernyataan-2m>;
end;
0 komentar

Materi Program Pascal BAB II


BAB II
PERNYATAAN INPUT dan OUTPUT
Dalam bahasa Pascal pernyataan input adalah pernyataan yang digunakan untuk
memasukkan data. Pernyataan input yang ada di Pascal adalah READ dan READLN.
Sedangkan pernyataan output adalah pernyataan yang digunakan untuk menampilkan hasil.
Ada dua pernyataan output yaitu WRITE dan WRITELN.

A. Pernyataan WRITE dan WRITELN
Bentuk pernyataan WRITE dan WRITELN:
WRITE (<argumen >);
Atau
WRITELN (<argumen>);
0 komentar

Materi Program Pascal BAB I


BAB I
PENGANTAR PASCAL
A. Program Turbo Pascal
Pascal adalah salah satu bahasa pemrograman tingkat tinggi (high level language). Nama
Pascal diambil dari nama seorang ahli matematika dan filosofi terkenal abad 17 dari
Perancis, yaitu Blaise Pascal. Bahasa ini dirancang oleh Prof. Niklaus Wirth dari Technical
University di Zurich, Switzerland. Turbo Pascal adalah salah satu versi Pascal yang paling
popular dan banyak digunakan saat ini. Bentuk tampilan awal Turbo Pascal adalah sebagai
berikut:
Senin, 12 Desember 2011 0 komentar

Mengenal Pascal

Pascal adalah bahasa pemrograman yang pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971. Dengan mengambil nama dari matematikawan Perancis, Blaise Pascal, yang pertama kali menciptakan mesin penghitung, Profesor Niklaus Wirth membuat bahasa Pascal ini sebagai alat bantu untuk mengajarkan konsep pemrograman komputer kepada mahasiswanya. Selain itu, Profesor Niklaus Wirth membuat Pascal juga untuk melengkapi kekurangan-kekurangan bahasa pemrograman yang ada pada saat itu.

Kelebihan Pascal :

Kelebihan dari bahasa pemrograman Pascal adalah:

Kamis, 08 Desember 2011 1 komentar

Sejarah Komputer


·        Pengertian Komputer
Komputer adalah alat yang dipakai untuk mengolah data menurut perintah yang telah dirumuskan. Secara luas, Komputer didefinisikan sebagai suatu peralatan elektronik yang terdiri dari beberapa komponen, yang dapat bekerja sama antara komponen satu dengan yang lain untuk menghasilkan suatu informasi berdasarkan program dan data yang ada. Adapun komponen komputer adalah meliputi : Layar Monitor, CPU, Keyboard, Mouse dan Printer (sbg pelengkap). Tanpa printer komputer tetap dapat melakukan tugasnya sebagai pengolah data, namun sebatas terlihat dilayar monitor belum dalam bentuk print out (kertas).
Dalam definisi seperti itu terdapat alat seperti slide rule, jenis kalkulator mekanik mulai dari abakus dan seterusnya, sampai semua komputer elektronik yang kontemporer. Istilah lebih baik yang cocok untuk arti luas seperti "komputer" adalah "yang memproses informasi" atau "sistem pengolah informasi."
Saat ini, komputer sudah semakin canggih. Tetapi, sebelumnya komputer tidak sekecil, secanggih, sekeren dan seringan sekarang. Dalam sejarah komputer, ada 5 generasi dalam sejarah komputer.
·       Generasi komputer
a)     Generasi Pertama
Pada tahun 1941, Konrad Zuse, seorang insinyur Jerman membangun sebuah komputer, Z3, untuk mendesain pesawat terbang dan peluru kendali.
Pada tahun 1943, pihak Inggris menyelesaikan komputer pemecah kode rahasia yang dinamakan Colossus untuk memecahkan kode rahasia yang digunakan Jerman. Kedua, keberadaan mesin ini dijaga kerahasiaannya hingga satu dekade setelah perang berakhir.
Howard H. Aiken (1900-1973), seorang insinyur Harvard yang bekerja dengan IBM, berhasil memproduksi kalkulator elektronik untuk US Navy. Kalkulator tersebut berukuran panjang setengah lapangan bola kaki dan memiliki rentang kabel sepanjang 500 mil. The Harvard-IBM Automatic Sequence Controlled Calculator, atau Mark I, merupakan komputer relai elektronik. Ia menggunakan sinyal elektromagnetik untuk menggerakkan komponen mekanik. Mesin tersebut beropreasi dengan lambat (ia membutuhkan 3-5 detik untuk setiap perhitungan) dan tidak fleksibel (urutan kalkulasi tidak dapat diubah). Kalkulator tersebut dapat melakukan perhitungan aritmatik dasar dan persamaan yang lebih kompleks.
Electronic Numerical Integrator and Computer (ENIAC), yang dibuat oleh kerjasama antara pemerintah Amerika Serikat dan University of Pennsylvania. Terdiri dari 18.000 tabung vakum, 70.000 resistor, dan 5 juta titik solder, komputer tersebut merupakan mesin yang sangat besar yang mengonsumsi daya sebesar 160kW. Komputer ini dirancang oleh John Presper Eckert (1919-1995) dan John W. Mauchly (1907-1980), ENIAC merupakan komputer serbaguna (general purpose computer) yang bekerja 1000 kali lebih cepat dibandingkan Mark I.
 
;