sintak pemrog 2 MENGHITUNG FAKTORIAL

 pamekasan, 03 januari 2013

MENGHITUNG FAKTORIAL

#include <iostream.h>

#include <windows.h>

int main (int argc, char *argv[])

{

 int faktn;

 int n;

 faktn=1;

 cout<<"\t\t+======================+"<<endl;

 cout<<"\t\t+ Menghitung faktorial +"<<endl;

 cout<<"\t\t+======================+"<<endl;

 cout<<endl<<endl;

 cout<<"masukkan bilangan yang ingin dihitung faktorialnya:"<<endl;

 cin>>n;

 for (int i=n;i>0;i--)

 {

  faktn=faktn*i;

  }

 cout<<"faktorial dari angka [" <<n<< "] adalah:"<<faktn<<endl;

 system ("PAUSE");

 return EXIT_SUCCESS;

}

WWW.kesabaran terindah.COM

pamekasan, 03 Januari 2013

ANUGRAH TERINDAH DALAM HIDUPKU

sejak itu aku mulai mengrt 

apa itu cinta yang sebenarnya

berawal dari dia cerita kepadaku 

bahwa dia menyukai seorang perempuan

                      padahal q juga menyukainya..........

                      bayangkan aj ,,,,,,

orang yang kita sukai menyukai perempuan laen

sakit rasanya,,,,

awalnya q tidak terma bahwa dia menyukai si perempuan itu,,,

karena perempuan itu sangat sangat,,,,,,

                     dengan sadar q mnta dia untuk tdak menyukai dia

                     dengan egoisnya aku,,,,ku katakan itu di depannya

tap lambat laun q bisa menerima keadaan

dengan dia mnceritakan semuanya,,,

bahw dia suka ma perempuan itu dul... bukan sekarangg

aku tak tau itu bohong apa tidak,,,,,

                     q sadar bahwa posisiku sekarang bukan orang yang menyukai dia

melainkan sebagai figur seorang adek,,,,yang selalu ingin melihat  kakaknya bahagia......

apalagi si perempuan itu lebih baek sekarang,,,dari pada dulu...

                     sakit ,,,,,,,,

tap harus sabar,,,,,,,,,,

mengert dengan keadaan,,,

itulah yang harus q lakukan....

                                    ya allah ku menyukainya karenaMU

                                    jika itu hanyalah nafsuku,,,,, buanglah perasaan ini.

                                    tapi yang paling utama berikanlah kebahagian itu untuknya

   

terma kasih ya allah.....

karena kau telah memberikan rasa suka terhadapnya

banyak pelajaran yg q dapat....

dari mulai harus sabar menerima kenyataan, menahan amarah, rasa egois,,,, hngga akhirnya q dapat menerima keadaan itu.

                                 ya allah...........

                                 jika boleh meminta satu kali lagi

                                 persatukan kami di jalanMU 

                                 karena kebahagiaan itu yang q inginkan

                                                                                                by : thembemz_clapchapchup@abiez.com

sintaks pemrograman

sintaks menghitung rata-rata BILANGAN BULAT

Algoritma RATA_RATA_BILANGAN_BULAT

{ Program utama untuk menghitung nilai rata-rata N buah

bilangan bulat. }

DEKLARASI (* Program Utama *)

{ tidak ada }

procedure HitungRataRata

{Menghitung nilai rata-rata N buah bilangan bulat. N>0}

DEKLARASI (* Prosedur *)

x : integer { data bilangan bulat }

N : integer { banyaknya data bilangan bulat, N > 0 }

k : integer { pencacah banyak bilangan }

jumlah : integer { jumlah seluruh bilangan }

rata : real { nilai rata-rata seluruh bilangan }

DESKRIPSI : (* Prosedur *)

read(N)

jumlah ¬ 0 { inisialisasi penjumlah }

for k ¬ 1 to N do

read(x)

jumlah ¬jumlah + x

endfor

rata ¬jumlah/N

write(‘Nilai rata-rata = ‘,rata)

DESKRIPSI : (Program Utama *)

write(‘Menghitung rata-rata N buah bilangan bulat’)

HitungRataRata