Screen Shoot :
Download Here (+crack)
Dimanabae aj ah :D
22.22
wildan_blitz
06.09
wildan_blitz
INTEGER A,B,C
WRITE (*,'(24(/))')
WRITE (*,'(A,\)') 'Masukkan Banyak Deret = '
READ (*,'(I2)') N
A=N
B=1
DO 10 I=1,N
DO 20 J=1,A
WRITE (*,'(A,\)') ' '
20 CONTINUE
WRITE (*,'(I1,A,I1,\)') A,' ',A
DO 30 J=1,B
WRITE (*,'(A,\)') ' '
30 CONTINUE
WRITE (*,'(I1,A,I1,\)') A,' ',A
WRITE (*,*)
A=A-1
B=B+2
10 CONTINUE
STOP
END
Aturan Penulisan Fortran :1. Kolom pertama merupakan Komentar atau metacommand (C, *, $).2. Kolom 1 sampai 5 untuk penulisan label statement berupa angka.3. Kolom 6 untuk indikasi sambungan dari baris sebelumnya.4. Kolom 7 sampai 72 untuk penulisan Statement FORTRAN.5. Kolom 73 sampai 80 tidak digunakan (Untuk Komentar bebas).

