ºÝºÝߣ

ºÝºÝߣShare a Scribd company logo
Y
T
T
START
N=0 NILAI =0 RATA= 0
I= 0 JUMLAH =0 BESAR=0
KECIL=0
KECIL = 1000
N
I < N
I = I + 1
I
NILAI
JUMLAH = JUMLAH +NILAI
NILAI > BEASR BESAR=NILAI
NILAI > KECIL KECIL=NILAI
RATA = JUMLAH/N
JUMLAH,RATA, BEASR,KECIL
END
Y
T
DIM N, I, NILAI, JUMLAH, BESAR, KECIL AS INTEGER
DIM RATA AS SINGLE
CLS
KECIL = 1000
INPUT "JUMLAH DATA="; N
ULANG:
IF I < N THEN
I = I + 1
PRINT "DATA KE-"; I; "=";
INPUT NILAI
JUMLAH = JUMLAH + NILAI
IF NILAI > BESAR THEN
BESAR = NILAI
END IF
IF NILAI < KECIL THEN
KECIL = NILAI
END IF
GOTO ULANG
ELSE
RATA = JUMLAH / N
PRINT "JUMLAH NILAI="; JUMLAH
PRINT "RATA-RATA="; RATA
PRINT "NILAI TERBESAR="; BESAR
PRINT "NILAI TERKECIL="; KECIL
END
END IF

More Related Content

Rata

  • 1. Y T T START N=0 NILAI =0 RATA= 0 I= 0 JUMLAH =0 BESAR=0 KECIL=0 KECIL = 1000 N I < N I = I + 1 I NILAI JUMLAH = JUMLAH +NILAI NILAI > BEASR BESAR=NILAI NILAI > KECIL KECIL=NILAI RATA = JUMLAH/N JUMLAH,RATA, BEASR,KECIL END Y T
  • 2. DIM N, I, NILAI, JUMLAH, BESAR, KECIL AS INTEGER DIM RATA AS SINGLE CLS KECIL = 1000 INPUT "JUMLAH DATA="; N ULANG: IF I < N THEN I = I + 1 PRINT "DATA KE-"; I; "="; INPUT NILAI JUMLAH = JUMLAH + NILAI IF NILAI > BESAR THEN BESAR = NILAI END IF IF NILAI < KECIL THEN KECIL = NILAI END IF GOTO ULANG ELSE RATA = JUMLAH / N PRINT "JUMLAH NILAI="; JUMLAH PRINT "RATA-RATA="; RATA PRINT "NILAI TERBESAR="; BESAR PRINT "NILAI TERKECIL="; KECIL END END IF