Selamat Datang Di Blog Saya...!!

Senin, 05 Desember 2011

Biodata

Asalamualaikum Wr. Wb
                Sebelumnya saya ucapkan salam kenal untuk kalian semua, perkenalkan nama saya Andri Arisandi saya tinggal di Jl. Kerio Rojali Desa Merah Mata (Balai) Banyuasin, Saya lahir pada tanggal 25 Oktober 1991 sekilas tentang pendidikan saya Sekolah Dasar (SD) saya di SD N 3 yang Sekarang Berubah Menjadi SD N .  Sekolah Menengah Pertama (SMP) di SMP N 21 Palembang, Sekolah Menengah Atas (SMA) saya di SMA N 7 Palembang, dan sekarang saya sedang menuntut ilmu di Politeknik Negeri Sriwijaya Jurusan Manajemen Informatika. Alhamdulillah walaupun itu cukup jauh dari rumahku, namun saya tetap pulang ke rumah (tidak Ngekos) maklum g’ da uang untuk ngekos, tapi untung masih ada motor kesayanganku walaupun sering di ejek tapi g’ papa demi masa depan saya, saya akan melakukan apapun selama saya masih sanggup untuk melakukannya. Bagi teman-teman yang lihat blog saya mohon komentarnya agar saya bisa memperbaiki blog saya dan bila berkenan kenal agar kalian bisa join ke blog saya terimakasih........
sekali lagi saya ucapkan salam........

Minggu, 13 November 2011

Pascal

Bahasa pemrograman pascal
Program adalah kumpulan instruksi atau perintah yang disusun sehingga mampunyai urutan logika yang benar untuk menyelesaikan suatu persoalan.
Struktur bahasa pascal
PROGRAM nama_program    {boleh ada atau boleh tidak ada}
Use.....                { deklarasi library/pustaka fungsi}
LABEL                   { deklarasi lebel}
CONST                   { deklarasi konstanta}
TYPE                    { deklarasi tipe data}
VAR                     { deklarasi VAriabel}
Procedure satu;
Procedure dus;
Function tambah;
Begin  {awal program utama}
·          
·          
<statemen-statement dari program nama_program>
·          
·          
End. <akhir program utama>

Contoh:
PROGRAM contoh;
Use crt;
Var
      Nama : string;
Begin
      Clrscr;
      Write (‘ ketik nama Anda : ‘);
      Readln(nama);
      Writeln (‘Selamat + ‘nama’, anda akan belajar Pascal...!’);
End.


Type data
Dalam pascal, semua variabel yang akan digunakan harus ditentukan dahulu type datanya.
Tipe data dalam Turbo Pascal bisa digambarkan sebagai berikut :

Tipe Sederhana
Tipe sederhana terbagi menjadi dua yaitu :
1.      Tipe Ordinal
                Tipe ordinal terbagi menjadi 5 yaitu
a.       Tipe Integer
Adalah tipe data yang nilainya mempunayi titik desimal. Ada 5 tipe yang termasuk dalam tipe integer:

Tipe
Batas Nilai
Format
SHORTINT
-128...127
Signed 8-bit (1 byte)
INTEGER
-32768...32767
Signed 16-bit (2 byte)
LONGINT
-2147483648... 2147483647
Signed 32-bit (4 byte)
BYTE
0...255
Signed 8-bit (1 byte)
WORD
0...65535
Signed 16-bit (2 byte)

Oprator-operator pada data tipe integer :

Operator
Arti
+
Penjumlahan
_
Pengurangan
*
Perkalian
DIV
Pembagian
MOD
Modulus (sisa Pembagian)



b.      Tipe Boolean
Tipe ini hanya mempunyai dua nilai yaitu true dan false, tipe ini biasanya digunakan  untuk operasi logika dengan ungkapan AND, OR, atau NOT.
c.       Tipe Char
Tipe ini digunaka  untuk mendefinisikan tipe data yang nilainya merupakan sebuah kerakter yang telah tersaji dalam table ASCII. Dalam program ini niali konstanta karakter diapi oleh tanda petik (‘’) misal : ‘a’,’2’
d.      Tipe Enumerated
Disebut tipe Enumerated karena semua nilai disebut satu persatu.
Contoh :
Type hari= {minggu.senin,selasa,rabu,kamis,jumat,sabtu};
e.      Tipe Sub Range
Merupakan pemberian batas niali yang mungkin untuk suatu variabel tipe data yang telah di definisikan. Contoh : jangkauan nilai dari 0 sampai 100
Type nilai = 0..100;

2.      Tipe Real
                Konstanta tipe real adalah bilangan yang mumpunyai titik desimal. Bilangan         real dinyatakan dalam bentuk eksponensial.
         Ada 5 tipe yang termasuk dalam tipe Real :
        
Tipe
Batas Nilai
Format
Real
2.9 x 10-39 .. 1.7 x 1038
Signed 8-bit (1 byte)
Singel
1.5 x 10-45.. 3.4 x 1038
Signed 16-bit (2 byte)
Double
5.0 x 10-324.. 1.7 x 10308
Signed 32-bit (4 byte)
Extended
3.4 x 10-4932.. 1.1 x 104932
Signed 8-bit (1 byte)
Comp
-263.. 283-1
Signed 16-bit (2 byte)

Oprator-operator pada data tipe real :
Operator
Arti
+
Penjumlahan
_
Pengurangan
*
Perkalian
/
Pembagian
Contoh :
 29.5/5 = 5.8
 29 div 5 = 5

3.      Tipe String
         Data bertipe string adalah data yang berisi sederetan karakteryang banyak karekternya bisa berubah-ubah sesuai kebutuhan, yanitu mulai dari 1 sampai 255 karakter.
 Contoh:
    Nama : String [60];{variabel nama menampung karakter max 60 karakter}
    Nama : String; {variabel nama menampung karakter max 255 karakter}

4.      Tipe Terstuktur
         Terdapat 4 tipe data terstruktur :
a.       Tipe Array
Adalah tipe terstuktur yang mempunyai komponen dalam jumlah yang tetep dan setiap komponen mempunyai tipe data yang sama. Posisi masing- masing komponen dalam array dinyatakan sebagai no index. Conth
·         Satu dimensi
 VAR
      Var_baru: ARRAY [1..200] OF INTEGER;
                {manampung bil. Integer max. 200}
·         Dua dimensi atau lebih
VAR
      Var_baru: ARRAY [1..200,1..200] OF REAL;
b.      Tipe Rekaman
Definisi Record hampir sama dengan Array, tetapi yang membedakan antara keduanya adalah kalau array semua komponennya bertipe sama sedangkan Rekaman setiap komponennya bisa bertipe data yang berbeda-beda. Contoh :
Type My_rec = Record
     Nama   : String [40];
     Nim    : String [8];
     Nilai  : Real;
Var
     Data_nya : my_rec;
End.
c.       Tipe Himpunan
Adalah kumpulan objek yang mempunyai tipe data yang sama dan urutan penulisannya tidak diperhitungkan. Contoh :
Type irama = (JAZZ, POP, ROCK, DANGDUT,  SKA);
      Musik = SET of irama;
Var
      Jenis_musik : Musik;
d.      Tipe Himpunan
Dalah kumpulan sejumlah komponen yang bertipe data sama, yang jumlahnya tidak tertentu, dan biasanya tersimpan dalam suatu media penyimpanan luar.

5. Tipe Pointer
         Tipe data pointer merupakan tipe data yang berada dengan yang lainnya. Semua tipe data yang lainya bersifat STATIS sedangkan tipe pointer bersifat DINAMIS.






DEKLARASI VARIABEL DAN PENGENAL
Program coba;
{* bagian deklarasi pustaka*}
Use crt; atau use wincrt;
{bagian deklarasi variabel}
Var
    Awal,akhir,simpan : integer;
{bagian terproses}
Begin
    Clrscr;
    Writeln (‘Deret Fibonacci’);
    Writeln (‘---------------‘);
    Awal := 0;
    akhir := 1;
    Write (awal, ‘’);
    WHILE akhir <= 100 do
      Begin
            Write (akhir.’’);
            simpan := akhir;
            akhir := simpan+awal;
            Awal := simpan;
      End
End.