Blog ini sedang dalam perbaikan

Untuk keterangan lebih lanjut silahkan hubungi Admin. Terimakasih.

Blog ini sedang dalam perbaikan

Untuk keterangan lebih lanjut silahkan hubungi Admin. Terimakasih

Blog ini sedang dalam perbaikan

Untuk keterangan lebih lanjut silahkan hubungi Admin. Terimakasih

Blog ini sedang dalam perbaikan

Untuk keterangan lebih lanjut silahkan hubungi Admin. Terimakasih

Blog ini sedang dalam perbaikan

Untuk keterangan lebih lanjut silahkan hubungi Admin. Terimakasih

Tuesday, April 19, 2016

TUGAS KELAS X.TI (RPL, TKJ, MM)

PEMILIHAN DALAM BAHASA PASCAL

Didalam membuat program tentunya ada masalah yang dapat di pecahkan secara langsung seperti menghitung sebuah persegi panjang yang hasilnya bisa kita dapatkan dari perkalian panjang * lebar.
Tentunya setiap masalah memiliki penangan yang berbeda, seperti didalam sebuah qiuz bagaimana kita bisa menentukan nilai grade A, grade B grade C dari hasil nilai angka yang kita dapatkan.

Statemen IF
Penggunaan statement If ini adalah bagaimana kita mengkondisikan sebuah expresi dimana kita menentukan sendiri mana expresi yang menghasilkan nilai true dan mana expresi yang menghasilkan nilai false. Untuk aturan penulisan statement IF ini adalah sebagai berikut :

If kondisi then
Statement1
else
statement2
end;

Statement di atas dapat kita ilustrasikan sebagai berikut : 
1. Jika suatu kondisi menghasilkan nilai true maka statement 1 akan dijalankan. 
2. Sebaliknya jika suatu kondisi menghasilkan nilai false maka statement 2 lah yang akan di jalankan. 

Berikut kita akan membuat program grade menggunakana statement If dengan bahasa pascal.

Contoh Program 1 :

program grade;
uses wincrt;
var n : integer;
begin
       write ('Masukan Nilai UAS : '); readln (n);
       if n >= 8 then
       write ('Grade A')
       else
       if (n >= 7) and (n <8) then
       write ('Grade B')
       else
       write ('C');
end.

Kode di atas jika dijalankan akan menghasilkan output sebagai berikut :

Penjelasan Kode :

Write ('Masukan Nilai Uas')
Berfungsi untuk menampilkan teks 'Masukan Nilai'

Readln (n)
Berfungsi sebagai inputan nilai Uas.

If n > = 8 then write ('Grade A')
Jika nilai inputan lebih besar dari n maka akan menampilkan Grade A

If (n > = 7) and (n < 8) then write ('Grade B')
Jika nilai inputan lebih besar sama dengan 7 dan kurang dari 8 maka akan menampilkan Grade B.

Else write ('Grade C')
Jika inputan tidak memenuhi kriteria A dan tidak memenuhi kriteria B makan akan menampilkan Grade C


Latihan Soal :
Buatlah program pascal password, dengan ketentuan :
- Jika password yang di input smkislamiyah, maka yang akan muncul Pasword Benar
- Jika password yang di input selain dari smkislamiyah maka yang akan muncul Password Salah
Share:

Definition List

Definition list
Consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.
Lorem ipsum dolor sit amet
Consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.

Alamat Kami

SADRAMMEDIA

Jl. Letkol Basir Surya

Lawang Condong Rt/Rw 002/001

Kel. Setianagara Kec. Cibeureum

Kota Tasikmalaya (46196)

Prov. Jawa Barat - Indonesia

Pages

Support

Ingin membuat Undangan yang Menarik, Terkini dan Berbeda?

Kami akan membuatkannya yang terbaik untuk Anda!

1. Undangan Berbasis Image Digital

2. Undangan Berbasis WEB

3. Undangan Berbasis Video Animasi

Hubungi Kami langsung Disini !