Pages

Thursday, September 27, 2012

Ngoding Polinom di Fortran




LISTING PROGRAM  :    
Polinom.for

      INTEGER HIT,HT,O,X
      INTEGER A(10),POL(10),H,N,PIL
      CHARACTER*20 LAGI,KEY
2     WRITE(*,'(24(/))')
      WRITE(*,'(A)') '      M E N U '
      WRITE(*,'(A)') '=================='
      WRITE(*,'(A)') ' 1. INPUT '
      WRITE(*,'(A)') ' 2. NILAI F(X) '
      WRITE(*,'(A)') ' 3. HASIL BAGI '
      WRITE(*,'(A)') ' 4. EXIT '
      WRITE(*,'(A)') '=================='

Saturday, August 4, 2012

Program Gauss Jordan dengan Fortran

Program Gauss Jordan dengan Fortran

c Contoh program Gauss Jordan
INTEGER ORDO
REAL M(10,10), MB(10,10)

C ********** I N P U T M A T R I K S **********

WRITE (*,'(24(/))')
WRITE (*,'(''BANYAK ORDO MATRIKS = '',\)')
READ (*,'(I4)') ORDO
WRITE (*,*)
DO 6 I = 1, ORDO
DO 5 J = 1, ORDO
WRITE (*,'(2X,''ELEMEN ('',I1,'','',I2,'') = '',\)') I, J
READ (*, *) M(I,J)
5 CONTINUE
6 CONTINUE

Menghitung luas lingkaran dengan fortran

Menghitung luas lingkaran dengan Fortran

berikut ini coding singkat yang digunakan untuk menghitung luas lingkaran dengan fortran :

LISTING PROGRAM :

        integer r
        real luas
        write(*,5)
        read(*,15)r
        luas=3.14*r*r
        write(*,20)luas
5      FORMAT('Masukkan Jari-jari:')
15    FORMAT(I5)
20    FORMAT('Luas=',F5.2)
        STOP
        END

ngoding C di ubuntu

Bahasa C di ubuntu

berikut ini listing untuk menampilkan informasi data diri dan nilai dengan menggunakan bahasa C.
ngodingnya di ubuntu :)


Friday, August 3, 2012

Catatan Linux

Catatan Linux Ubuntu

catatan ini isinya campur aduk..intinya masih tentang linux..
tadinya saya catat di buku,tapi takut bukunya hilang maka saya catat ulang lagi saja di blog ini..
semoga bermanfaat bukan hanya untuk saya,tapi untuk pembaca sekalian.. :)
ohh iya, di sini saya menggunakan linux ubuntu server 12.04 LTS.

Monday, July 30, 2012

Fixie


Apa itu Fixie ?
Kata Fixie berasal dari kata Fixed Gear. Fixed Gear ini adalah, gear belakang yang dibikin mati dengan roda belakang. Jadi pedal sepeda akan ikut berputar saat roda perputar. Untuk mengerem atau mengurangi laju sepeda, cukup dengan menahan putaran pedal ke arah belakang (untuk yang tidak menggunakan rem depan). Dulu sering disebut dengan Doltrap dan sebenarnya inilah hal utama yang membedakan sepeda fixie dengan jenis sepeda lainnya. Jangan salah pengertian dengan Torpedo. Kalo torpedo adalah pedal masih bisa berhenti mengayuh saat roda belakang berputar. Persamaannya, untuk mengerem sama-sama dengan menekan pedal sepeda ke arah belakang. Banyak yang salah pasang gear ini sehingga keinginan membuat sepeda fixie justru malah jadi sepeda single speed dengan torpedo. Untuk speed sendiri kebanyakan menggunakan single speed, sehingga sepeda fixie akan memberikan kesan sederhana baik dalam tampilan karena tidak adanya kabel-kabel gear speed yang melintang dan mekanik gear yang membikin menjadi rame dan juga kemudahan perawatan.