Membuat Program Pascal if else "Channel TV"

Halo sobat watershare..
Oke dalam kesempatan kali ini saya akan berbagi tentang program pascal..
Pascal merupakan bahasa pemrograman yang di anjurkan untuk pemula yang akan belajar bahasa pemrograman lebih lanjut seperti bahasa C++,java, dan lain-lain..
Pada kesempatan kali ini yang saya bagikan adalah tentang menentukan channel TV.

Oke langsung saja ini adalah syntaxnya..

program Chanel_TV;
uses crt;
var
c,c2    :char;
begin
clrscr;
write ('Masukan Kode Canel TV: ');readln(c2);
c:=upcase(c2);
if(c='A') then
begin
write('SCTV');
end
else if(c='B') then
begin
write('RCTI');
end
else if(c='C') then
begin
write ('TRANSTV');
end
else if(c='D')then
begin
write ('TVONE');
end
else if (c='E') then
begin
write ('MNCTV');
end
else if (c='F') then
begin
write ('TVRI');
end
else if(c='G') then
begin
write ('INDOSIAR');
end
else write('GLOBAL TV');
readln;
end.

Ini adalah hasilnya :


Penjelasan :
  1. DI program nanti akan muncul tulisan Masukan Kode Canel TV: karena ada perintah write disitu, jika ada perintah write/writeln maka yang berada dalam tanda kurung dan petik akan ditampilkan pada program
  2. Di program tersebut kita hanya perlu menuliskan kode-kodenya saja, lalu otomatis jika di tekan enter nanti akan mucul hasilnya, itu karena kita menggunakan syntax if / bisa juga disebut sebagai pengambilan keputusan
ya mungkin hanya itu penjelasanya karena program di atas tidak terlalu rumit dan seharusnya tidak butuh waktu lama unntuk memahami nya..
Jika ada yang tidak jelas bisa di tanyakan di komentar ..
dan jika ada yang mau request tutorial pemrograman lain bisa request di grup facebook kami yaitu:
 Request tutorial pemrograman gratis
Tetap kunjungi blog kami dan nantikan tutorial-tutorial berikutnya..