Title: Message

 

Terima kasih buat Mas Heru Rahadyan


From: [email protected] [mailto:[email protected]] On Behalf Of Heru Rahadyan
Sent: Thursday, December 08, 2005 6:57 AM
To: [email protected]
Subject: RE: [Programmer-VB] Menghitung NIlai MAX dan MIN

 

coba bantu ya tp CMIIW :)

 

 

 

10 CLS

20 DIM NAMA$(5),NILAI(5) 

30  JUM_MHS=0: TOTAL=0

40  BESAR=0: KECIL=0 

50 NAMA$(1)="ANA":NILAI(1)=40 

60 NAMA$(2)="ANI":NILAI(2)=60   

70 NAMA$(3)="ANE":NILAI(3)=50 

80 NAMA$(4)="ANO":NILAI(4)=60   

90 NAMA$(5)="ANU":NILAI(5)=40   

' bukannya biasanya di mulai dari 0 tuh array-nya??

 

BESAR=NILAI(1): KECIL=NILAI(1)

 

100 TERBESAR=????????  TERKECIL=???   -->

 

120 PRINT "OUTPUT PROGRAM BILA DI RUN"

130 PRINT "============================="

140 PRINT " NO         NAMA       NILAI "

150 PRINT "=============================" 

 

FOR A= 1 TO UBOUND(NAMA)  '--> bukannya biasanya mulai dari nol?? kalo dari 1 ntar ubound(nama) + 1 .. kali ye :)

190 PRINT  A,NAMA$( A),NILAI( A)

 

IF NILAI(A) >BESAR THEN BESAR=NILAI(A)

IF NILAI(A)<KECIL THEN KECIL=NILAI(A)

TOTAL=TOTAL + NILAI(A)

NEXT A

 

240 PRINT "==============================" 

250 PRINT "JUMLAH MAHASISWA ="; UBOUND(NAMA)

260 PRINT "TOTAL NILAI      =" ; TOTAL 

270 PRINT "NILAI RATA-RATA  ="; TOTAL/UBOUND(NAMA) 

280 PRINT "NILAI TERBESAR   ="; BESAR 

290 PRINT "NILAI TERKECIL   ="; KECIL 

300 END

 

 

s aya ngga tau nih, programnya kenal perintah ubound ngga?

kalo ngga kenal, pake

JUM_MHS=JUM_MHS + NILAI (A) di looping nya

nanti perhitungannya ganti dgn JUM_MHS itu

 

urutan nomornya disesuaikan aja ya




Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]





SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages Java programming language


YAHOO! GROUPS LINKS




Kirim email ke