Menu Close

Contoh Penggunaan Statemen Case Of pada Pascal

Terakhir diperbaharui pada

Script Pascal berikut akan menampilkan 3 pilihan, masing-masing sebagai berikut :

loading...
loading...

Jika angka = 1, maka karakter yang akan tampil “satu”.
Jika angka = 2, maka karakter yang akan tampil “dua”.
Jika angka = 3, maka karakter yang akan tampil “tiga”.
Selain daripada itu akan menampilkan “Pilihan Salah!”

Program Angka;
uses wincrt;
var
a:integer;
begin
write('Angka (1-3) = ');readln(a);
writeln;
case a of
1:write('Satu');
2:write('Dua');
3:write('Tiga');
else
write('Pilihan Salah!');
end;
end.

DMCA.com Protection Status
Artikel ini dilidungi oleh DMCA Takedown Services & Website Content Protection. Dilarang Copy-Paste.
Yang mau ngajakin ngopi silahkan klik
Jangan lupa like kami di Facebook untuk update informasi terbaru:

Artikel ini berada dalam kategori Pascal

Artikel Terkait:

17 Komentar

  1. Pingback:option wealth Sydney

  2. Pingback:?????????

  3. Pingback:Bdsm

  4. Pingback:DMPK Services

  5. Pingback:www.sosyolite.net

  6. Pingback:king size cigarettes

  7. Pingback:how to make money with a iphone

  8. Pingback:physio exercises for sprained ankle

  9. Pingback:cittadinanza americana

  10. Pingback:asia qq

  11. Pingback:clinica iphone

  12. Pingback:Real Estate St George

  13. Pingback:lose weight gym routine

  14. Pingback:bandar kiu kiu

  15. Pingback:Aws Alkhazraji

  16. Pingback:satta matka

  17. Pingback:trendideas.com indoor garden

Mari Berdiskusi

Chat via WA
1
Hai,
Semoga harimu menyenangkan...
Powered by