Kamis, 15 November 2012

D2 CUTTING variasi motor

Bagi sobat2 yang ingin modivikasi motornya khususnya penggila modiv, disini tempatnya..D2 Cutting yang beralamatkan di jl.kemakmuran Depok2 timur,Kota depok,,ini cukup menjanjikan,dengan tanpa merogoh kocek yang tidak begitu mahal,sobat sudah bisa merubah penampilan motor sobat menjadi lebih keren,dengan scotlate ala airbrush motor sobat pasti akan terlihat WOW !!! begitu kata anak2 gaul sekarang,,hehehe..
dibawah ini adalah contoh2 hasil tampilan motor dari pengerjaan kami :































itu salah satu contohnya,,,bagi sobat yang mau,silahkan datang langsung ke outlet kita,atau bisa hubungi kami di :
HP : 081218641480
PIN BB : 2a2961cb
email : becktichan89@gmail.com
FB : ron_rooney33@yahoo.com
twitter : @bektichan

Rabu, 14 November 2012

contoh program pascal menentukan menu empat persegi panjang

Naaah ketemu lagi di blog kesayangan ane,,,becktian.blogspot.com hehehe....curhat dikit,sebenernya lagi galau ni,hahah tapi dari pada kepikiran yang ga jelas,mending share postingan,he oke pada postingan kali ini ane mau share contoh program pascal menentukan menu empat persegi panjang,,seperti biasa tanpa panjang lebar langsung aja...
untuk contoh kasusnya adalah sebagai berikut :
  1. Buatlah program pascal untuk menentukan luas empat persegi panjang,keliling,dan panjang diagonalnya, dilengkapi dengan menu pilihan : 1) luas 2) keliling 3) diagonal 4) keluar program, pada setiap pilihan menu di baca panjang dan lebarnya.
untuk rumus adalah :
  • Luas = panjang * lebar
  • Keliling = 2*panjang + 2*lebar
  • Diagonal = sqrt (panjang*panjang + lebar*lebar) 
nah untuk penyelesaiannya :


dan bila di Run hasilnya akan seperti ini :






sekian dulu,selamat mencoba,dan semoga bermanfaat...


Kamis, 01 November 2012

Contoh Program Pascal Pengulangan For

Singkat kata Singkat Cerita ^_^ mumpung lagi nyantai,,,ane mau berbagi sedikit contoh program pascal pengulangan For,pada contoh ini ane mau mengambil contoh sederhana,yaitu mencetak banyak nama/kalimat sesuai keinginan kita, contoh disini ane ingin mencetak nama ane "Bachtiar Rahman" sebanyak 10 kali, langsung ae;
  • Contoh Program algoritmanya :
program mencetak_nama
deklarasi
i : integer
algoritma
for i =1 to 10 do
write ('Bachtiar Rahman')
endfor
  • Program Pada pascalnya :


Setelah di Compile sukses ,dan di Run,maka hasilnya akan seperti dibawah :



semoga bermanfaat,,,silahkan komen apabila banyak kesalahan,ma'lum latihan ^_^ karna argumen sobat semua pasti akan membuat ane lebih baik.thnks before.