Kaskus

Tech

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 13:13
0
701
10
GuestAvatar border
Komentar yang asik ya
Urutan
Terbaru
Terlama
GuestAvatar border
Komentar yang asik ya
Komunitas Pilihan