PHPmaster
20th November 2011, 11:20 AM
Malam agan - agan semua forum programmer :shakehand:
ane pengen nanya ni gan, khususnya tentang pascal,
maklum newbie..
ane dapet tugas dari dosen,
nah inputan ane kan kaya gini..
http://img806.imageshack.us/img806/3563/61028768.png (http://img806.imageshack.us/i/61028768.png/)
tapi ko malah hasil outputnya jadi begini..
http://img101.imageshack.us/img101/9195/30058894.png (http://img101.imageshack.us/i/30058894.png/)
ko yang inputan lainnya ga muncul ya gan :tanya:
minta pencerahannya dong gan, udah buntu nih, searching di mbah juga ga ketemu solusinya :hope:
[color="Green"]
Quote:
Originally Posted by GrindStone22
http://static.kaskus.us/images/buttons/viewpost.gif (http://ceriwis.us/showthread.php?p=387718655#post387718655)
Hmm... itu karena, program hanya melihat "case 1:" sekali aja, terus doi langsung loncat ke "end case". :)
Solusinya :
Code:
Case Zodiac of
1 :
begin
WriteLn('Aries');
WriteLn('21 Maret - 20 April');
//terusin di sini
end;
Semoga membantu. :)
Salam,
-GrindStone
kata si grindstone begini..
ane tambahin case zodiac of di setiap 1, 2, dan 3..
tapi ko yang ada malah ga bisa di running
http://img851.imageshack.us/img851/1052/94253993.png (http://img851.imageshack.us/i/94253993.png/)
depresi ni gan dari jam 6 ga ketemu" :hope:
</div>
ane pengen nanya ni gan, khususnya tentang pascal,
maklum newbie..
ane dapet tugas dari dosen,
nah inputan ane kan kaya gini..
http://img806.imageshack.us/img806/3563/61028768.png (http://img806.imageshack.us/i/61028768.png/)
tapi ko malah hasil outputnya jadi begini..
http://img101.imageshack.us/img101/9195/30058894.png (http://img101.imageshack.us/i/30058894.png/)
ko yang inputan lainnya ga muncul ya gan :tanya:
minta pencerahannya dong gan, udah buntu nih, searching di mbah juga ga ketemu solusinya :hope:
[color="Green"]
Quote:
Originally Posted by GrindStone22
http://static.kaskus.us/images/buttons/viewpost.gif (http://ceriwis.us/showthread.php?p=387718655#post387718655)
Hmm... itu karena, program hanya melihat "case 1:" sekali aja, terus doi langsung loncat ke "end case". :)
Solusinya :
Code:
Case Zodiac of
1 :
begin
WriteLn('Aries');
WriteLn('21 Maret - 20 April');
//terusin di sini
end;
Semoga membantu. :)
Salam,
-GrindStone
kata si grindstone begini..
ane tambahin case zodiac of di setiap 1, 2, dan 3..
tapi ko yang ada malah ga bisa di running
http://img851.imageshack.us/img851/1052/94253993.png (http://img851.imageshack.us/i/94253993.png/)
depresi ni gan dari jam 6 ga ketemu" :hope:
</div>