Variabel dan Ekspresi Struktur Percabangan dan Struktur Perulangan
Variabel dan Ekspresi Struktur Percabangan dan Struktur Perulangan Minggu V
Variabel l Variabel adalah identifier yang berisi data yang dapat diubah-ubah nilainya didalam program. Dengan keyword Var Contoh : Uses wincrt; Var Luas, Panjang, Lebar, Tinggi : Integer; Keterangan : String; Begin Write ('Masukan Panjang : '); Read. Ln (Panjang); Write ('Masukan Lebar : '); Read. Ln (Lebar); Write ('Masukan Tinggi : '); Read. Ln (Tinggi); Luas : = Panjang * Lebar * Tinggi; Keterangan : = 'Luas Persegi Panjang adalah '; Write. Ln (Keterangan, Luas); End.
Constanta l l l Data konstanta nilainya sudah ditentukan dan pasti, tidak dapat dirubah didalam program. Dengan Keyword Const Contoh : Uses wincrt; Const Potongan = 0. 2 ; Gaji = 25000 ; Namaperusahaan = 'PT ABC' ; Begin Writeln ( 'Potongan =', Potongan ) ; Writeln ( 'Gaji =', Gaji ) ; Writeln ( 'Nama =', Namaperusahaan) ; End.
Percabangan If - Else • Awal • Dengan Input Nilai • Mengecek apakah nilai yang diinputkan tsb lebih besar sama dengan 80… jika ya maka output Nilai Huruf = A jika tidak • Mengecek apakah nilai yang diinputkan tsb lebih besar sama dengan 65. . Jika ya maka output Nilai Huruf = B jika tidak • Mengecek apakah nilai yang diinputkan tsb lebih besar sama dengan 41. . Jika ya maka output Nilai Huruf = C jika tidak • Mengecek apakah nilai yang diinputkan tsb lebih besar sama dengan 26. . Jika ya maka output Nilai Huruf = D jika tidak • Output Nilai Huruf = E • Akhir
Latihan Percabangan l Kelulusan mahasiswa ditentukan berdasar nilai ujian yang didapatkan. Jika nilai ujian lebih dari atau sama dengan 70, mahasiswa dinyatakan lulus dan jika tidak, dinyataan tidak lulus. Buatlah flowchart yang membaca nilai ujian dan menentukan status kelulusan dengan menampilkan pesan yang sesuai di layar.
Latihan Percabangan l l Dalam sebuah warnet dengan tarif 4000 per jam. . jika pelanggan mengakses internet 2 -3: 59 jam maka mendapat potongan 10%, jika 4 -5: 59 jam maka mendapat potongan 20%, jika 6 jam keatas maka mendapat potongan 30%. Buatlah Flowchartnya! (Bonus Tugas) Bayar 4000 Potongan Bayar Akhir 0. 1 2 8000 800 7200 0. 2 4 16000 3200 12800 0. 3 6 24000 7200 16800
Latihan Percabangan l Buatlah flowchart untuk menentukan nilai dari sejumlah uang dalam bentuk huruf, misalnya Input : 1 maka Output nya Satu, Input 10 maka Output nya Sepuluh, Input 11 maka Outputnya Sebelas, Input 100 maka Output nya Seratus dst…(Bonus MID)
Perulangan While. . do l l While (kondisi) Do (Statemen) Kondisi adalah sebuah ekspresi boolean, jika ekspresi boolean bernilai true statement di jalankan. Dan perulangan akan berhenti jika kondisi bernilai false Contoh : menghitung jumlah n bilangan yang diinputkan
Perulangan Repeat. . Until l l Repeat (statemen) Until (Kondisi) Kondisi adalah sebuah ekspresi boolean jika ekspresi boolean bernilai false statement di jalankan. Dan perulangan akan berhenti jika kondisi bernilai true. Contoh : Menulis angka dari 1 hingga batas tertentu
uses wincrt; var cc, batas : integer; begin clrscr; write ('Masukkan batas angka '); readln (batas); cc : = 1; repeat write (cc); cc : = succ(cc); until (cc>batas); end.
Perulangan For l l For (kondisi) Do (Statemen) Kondisi : (nilai awal) to (nilai akhir) Dan perulangan akan berhenti jika mencapai nilai akhir Contoh : menghitung jumlah n bilangan yang diinputkan
uses wincrt; var i : integer; batas : integer; hasil : integer; begin clrscr; write ('Masukkan integer positif : '); readln (batas); hasil : = 0; For i: =1 to batas do begin hasil : = hasil + i; end; write ('Jumlah 1 sampai ', batas, ' = '); write (hasil); readln; end.
Tugas l Buatlah flowchart(uji coba) dan program(uji coba) untuk menentukan : – – – Deret bilangan berikut: 1, 2, 4, 8, 16, 32, 64, 128, 256, … (Program akan berhenti jika pada pertanyaan “Lanjut [Y/T] ? " diisi huruf T) Deret bilangan berikut : 1, 3, 9, 27, 81, 243, …. (Program berhenti jika pada pertanyaan “Lanjut [Y/T] ? " diisi huruf T) Tentukan nilai akar X 1 dan X 2 dari persamaan kuadrat ax 2 – bx + c = 0 dengan rumus X 1, 2 =
- Slides: 13