Selamat datang
Sponsored Links
This presentation is the property of its rightful owner.
1 / 21

Selamat datang PowerPoint PPT Presentation


  • 205 Views
  • Uploaded on
  • Presentation posted in: General

Selamat datang. M. Haviz Irfani,S.Si. PEMROGRAMAN 1. Struktur Utama Program Pascal. Kepala program : Berisi judul/nama program yg mencerminkan program yg dibuat,tanda ‘_’ digunakan sbg pemisah nama program. Sintak: Program perkalian_dua_bil;

Download Presentation

Selamat datang

An Image/Link below is provided (as is) to download presentation

Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author.While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server.


- - - - - - - - - - - - - - - - - - - - - - - - - - E N D - - - - - - - - - - - - - - - - - - - - - - - - - -

Presentation Transcript


Selamat datang

M. Haviz Irfani,S.Si

PEMROGRAMAN 1


Struktur Utama Program Pascal

  • Kepala program : Berisi judul/nama program yg mencerminkan program yg dibuat,tanda ‘_’ digunakan sbg pemisah nama program.

    Sintak: Program perkalian_dua_bil;

  • Bagian deklarasi Program : pernyataan yg menetapkan data dan objek yg digunkan utk eksekusi prog.

  • Badan Program: terdiri dari uraian langkah2x eksekusi bagi data dan deklarasi ,langkah2x disusun bdasarkan Algoritma/diagram alir.


Struktur Pascal

Program nama_program;{Kepala}

{deklarasi}

---

---

{deskripsi}

Begin

---

---

End.

Deklarasi : Var,const,type,procedure,function, dan label

Blok pernyataan


Membaca input/masukan

  • Instruksi yg digunakan yaitu : sintak :Read(v1,v2,…,vj,..,vn) ;

    Readln(v1,v2,…,vj,..,vn);

    vj:nama variabel untuk masukan/ data

Membaca Output/Keluaran

  • Instruksi yg digunakan yaitu : sintak :Write(v1,v2,…,vj,..,vn) ;

    Writeln(v1,v2,…,vj,..,vn);

    vj:nama variabel untuk masukan/ data


3 Pola Struktur Logika

1. Perintah-perintah Berurutan

2. Pilihan (seleksi)

3. Ulangan/iterasi


Perintah2x Berurutan :

  • Ex:

    begin

    readln(data1,data2);

    jumlah:=data1+data2;

    selisih:=data1-data2;

    writeln(jumlah :6,selisih:6);

    end.


SELEKSI

CASE OF

IF

KONDISI

If X > 2

Case X < 2

If X = 2


IF …. Dan Case…. : “Suatu kondisi yang mengatur jalan nya program jika kondisi bernilai BENAR atau SALAH”

Kondisi

False

Pernyataan selanjutnya

True

Pernyataan selanjutnya


IF THEN

If KONDISI Then Pernyataan ;

If KONDISI Then Begin

Pernyataan1; Pernyataan2; : : PernyataanN; End;

IfKONDISI Then Begin

Pernyataan1; Pernyataan2; : : PernyataanN;

End

Else Pernyataan;


Buatlah Program Akar pers Kuadrat....


CASE OF

Case Variabel Of

Kondisi1 : Pernyataan1; Kondisi2 : Pernyataan2; : : KondisiN : PernyataanN;

End; {End case}

Case Variabel Of

Kondisi1 : Begin BlokPernyataan1 End; Kondisi2 : Begin BlokPernyataan2 End; : : KondisiN : Begin BlokPernyataanN End;

Else Pernyataan;

End; {End case}


Buatlah Program OPERATOR Nilai

dengan menggunakan Pernyataan Case Of

Penjumlahan (+) dua Bilangan

Pengurangan (-) dua Bilangan

Perkalian (*) dua Bilangan

Pembagian (/) dua Bilangan


PERULANGAN

GOTO

REPEAT..

FOR

WHILE..DO

Repeat

I := 1 to n

While I < 5

Do

I

Until I = 5


FOR

Struktur ini digunakan utk melakukan perulangan yg tidak berkondisi. Jumlah perulangannya pasti.

Counter : suatu variabel tampungan nilai

Sintak :

FOR Variabel := Nil_awal To nil_akhir Do

FOR variabel := Nil_akhir DownTo Nil_awal Do

Apa Bedanya ??


Perulangan Positif (naik) contohnya:

For I := 1 to 100 Do

write(I);

Run: 1 2 3 4 …. 100

Perulangan negatif (turun) contohnya :

For I:= 100 DownTo 1 Do

Write(I);

Run : 100 99 98 … 1

Buatlah Program Menjumlahkan

dan Mengalikan N Buah Bilangan!!!


WHILE...DO

Struktur yg melakukan perulangan blok pernyataan jika kondisi bernilai Benar dan akan berhenti jika kondisi bernilai Salah…Struktur ini menggunakan Blok (Begin…End) dan Kondisi berada pd Awal perulangan.

Sintak :

While Kondisi Do Begin Blok Pernyataan end;

Contoh :

While Komen = True Do Begin nama :=‘Pascal’; I:=I+1; IF I> 5 Then Komen:= False; End;


REPEAT..UNTIL

Struktur yg melakukan perulangan blok pernyataan jika kondisi bernilai Salah dan akan berhenti jika kondisi bernilai Benar…Struktur ini tanpa menggunakan Begin..End (Blok) dan kondisi berada pd akhir perulangan

Sintak :

Repeat Blok Pernyataan Until Kondisi ;

Contoh :

Repeat nama :=‘Pascal’; I:=I+1; IF I> 5 Then Komen:= False; Until Komen= True;


GOTO

Struktur GOTO melakukan perulangan/loncat ke pernyataan yg telah diberi tanda Label. Usahakan dalam membuat program sedikit mungkin menggunakan Struktur ini…

Sintak :

GoToLabel

Sintak Label:

LabelLabel1, label2,.., labelN ;

label

Sejumlah pernyataan


TUGAS BERKELOMPOK

Buatlah program mencari akar persamaan kuadrat dari n persamaan kuadrat…Gunakan Struktur IF..Then

Buatlah program deret berubah tanda (-1,2,-3,4,-5,6….N).Gunakan Struktur While..do.

Buatlah program gaji dari N orang (Nama,Gol,Gapok, Bonus,& Gaji). Gaji=Gapok+Bonus.Golongan(A bonus Rp.3000 ; B bonus Rp.5000; C bonus Rp.7000)


TUGAS BERKELOMPOK

Tugas Harus Dijilid dengan cover depan dengan logo Stmik MDP.

Buat Nama Kelompok{Ketua dan wakil},kata pengantar, daftar isi, permasalahan, pembahasan{harus lengkap} dan kesimpulan.

Flowchart,Algoritma & Program hrs lengkap.


TERIMA KASIH YAAA....


  • Login