2013-05-02 10:10
program aray;uses wincrt;TYPE nilai = array[1..3] of integer;Var x : integer; jumlah, rata_rata : real; a : nilai;BEGINfor x := 1 TO 3 DO BEGIN WRITE('Nilai Ke - ',x,' = '); READLN(a… Read More
Blog Directory > Internet Blogs > free download internet Blog >
Get updates delivered right to your inbox!