Pengaturan

Gambar

Lainnya

Tentang KASKUS

Pusat Bantuan

Hubungi Kami

KASKUS Plus

© 2024 KASKUS, PT Darta Media Indonesia. All rights reserved

KenjiYamamotoAvatar border
TS
KenjiYamamoto
Source Code Pascal Saya Error Saat Di-compile
Permisi mau tanya gan, kan saya pernah coding bahasa pascal tapi kok waktu saya compile source code program pascal saya error.
berikut ini kode program pascal saya:
PHP Code:
program batu_gunting_kertas;

uses crt;

var
    
pilihan,pilihan_lawan:integer;

begin
    
(* your code goes here *)
    
clrscr;
    
readln(pilihan);
    
readln(pilihan_lawan);
    
    if 
pilihan=1 then
    begin
        
if pilihan_lawan=1 then
            writeln
('seri');
        else if 
pilihan_lawan=2 then
            writeln
('menang');
        else if 
pilihan_lawan=3 then
            writeln
('kalah');
    
end
    
else if pilihan=2 then
    begin
        
if pilihan_lawan=1 then
            writeln
('kalah');
        else if 
pilihan_lawan=2 then
            writeln
('seri');
        else if 
pilihan_lawan=3 then
            writeln
('menang');
    
end
    
else if pilihan=3 then
    begin
        
if pilihan_lawan=1 then
            writeln
('menang');
        else if 
pilihan_lawan=2 then
            writeln
('kalah');
        else if 
pilihan_lawan=3 then
            writeln
('seri');
    
end;

    
readln;
end


mungkin buat agan kaskuser semua ada yg tahu cara supaya tidak error pas di compile, buat agan kaskuser yg tahu gimana caranya saya mohon bantuannya dimari gan. Terima kasih emoticon-Big Grinemoticon-Big Grin
Diubah oleh KenjiYamamoto 02-08-2020 06:13
0
669
10
GuestAvatar border
Komentar yang asik ya
Mari bergabung, dapatkan informasi dan teman baru!
Programmer Forum
Programmer ForumKASKUS Official
20.2KThread4.4KAnggota
Urutkan
Terlama
GuestAvatar border
Komentar yang asik ya
Ikuti KASKUS di
© 2023 KASKUS, PT Darta Media Indonesia. All rights reserved.