- Beranda
- Programmer Forum
Source Code Pascal Saya Error Saat Di-compile
...
![KenjiYamamoto](https://s.kaskus.id/user/avatar/2012/04/30/avatar4300956_55.gif)
![Avatar border](https://s.kaskus.id/images/avatarborder/1.gif)
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:
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![Big Grin emoticon-Big Grin](https://s.kaskus.id/images/smilies/sumbangan/14.gif)
![Big Grin emoticon-Big Grin](https://s.kaskus.id/images/smilies/sumbangan/14.gif)
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
![Big Grin emoticon-Big Grin](https://s.kaskus.id/images/smilies/sumbangan/14.gif)
![Big Grin emoticon-Big Grin](https://s.kaskus.id/images/smilies/sumbangan/14.gif)
Diubah oleh KenjiYamamoto 02-08-2020 06:13
0
669
10
![Guest](https://s.kaskus.id/user/avatar/default.png)
![Avatar border](https://s.kaskus.id/images/avatarborder/1.gif)
Komentar yang asik ya
Mari bergabung, dapatkan informasi dan teman baru!
![Programmer Forum](https://s.kaskus.id/r200x200/ficon/image-176.png)
Programmer Forum![KASKUS Official KASKUS Official](https://s.kaskus.id/kaskus-next/next-assets/images/icon-official-badge.svg)
20.2KThread•4.4KAnggota
Urutkan
Terlama
![Guest](https://s.kaskus.id/user/avatar/default.png)
![Avatar border](https://s.kaskus.id/images/avatarborder/1.gif)
Komentar yang asik ya