Percabangan if..else digunakan untuk pengujian sebuah kondisi. Jika kondisi yang diuji tersebut terpenuhi, maka program akan menjalankan pernyataan-pernyataan tertentu. Jika kondisi yang diuji salah, program akan menjalankan pernyataan yang lain.
Contoh :
Uses Crt;
Var
Nil1, Nil2 : Integer;
NilRata : Real;
Begin
ClrScr;
Write('Masukan Nilai 1 : ');
ReadLn(Nil1);
Write('Masukan Nilai 2 : ');
ReadLn(Nil2);
NilRata := (Nil1 + Nil2)/2;
WriteLn('Nilai Rata-Rata = ', NilRata:5:2);
IF NilRata >= 60 THEN
WriteLn('Hasilnya = Lulus')
ELSE
WriteLn('Hasilnya = Gagal');
ReadLn;
End.
Atika Rina
[email protected]
9 responses to “Pengertian If..Else dan Contoh Programnya”
mas, apa string yang paling atas itu harusnya uses wincrt;
soalnya kalau saya pakai sama dengan kode diatas, pas di run muncul eror mas
trus perbedaan crt sama wincrt itu apa ya mas?
terima kasih atas jawabannya…
@chamid
wincrt digunakan di turbo pascal for windows
sedang crt digunakan di pascal for dos
jadi kode (baris 1), maksudnya di run di pascal for dos .. :)
ok. terima kasih atas pencerahannya :)
@chamid
sama-sama bro .. :)
mas maaf nanya,
jadi kalo ada pertanyaan
apa fungsi uses wincrt; ? dan pengertiannya ? berarti jawabannya singkat aja ya, wincrt itu for windows, crt untuk dos gitu aja kan?
mas, kalau nda usah pakai wincrt atau crt itu ngga apa”..
itu cuma bwt deklarasi programnnya aj
NilRata:5:2); arti nilai 5:2 itu apa yah mas?
apa sih fungsi uses???
apakah uses wincrt bisa di gunakan di program TP yg bukan windows? atau sebaliknya, uses crt bisa di gunakann untuk TP windows????