Langsung ke konten utama
2a)#include<iostream>
#include<conio.h>
using namespace std;

int x[10]={1,5,2,10,9,8,4,3,7,6};
main()
{

    int i,j,t,n=9;
    for(i=0;i<n;i++){
        for(j=i+2;j<=n;j+=2){
            if(x[i]>x[j]){
                t=x[i];x[i]=x[j];x[j]=t;
            }
        }
    }
       for(i=0;i<n;i++){
            cout<<x[i]<<" ";

}
}
 


2b)#include<iostream>
#include<conio.h>
using namespace std;
main(){
    int X[11],N=11,i,k,t=0,mid,hasil;
    for (i=1;i<=N;i++) {
X[i]=i*i+3*i/2;
cout<<X[i]<<" ";
}

mid = (1+N)/2;
for(k=1;k<=3;k++){
switch (k) {
case 1 : {return X[(1+mid-1)/2]*2/3;break;}
case 2 : {return X[mid]/2;break;}
case 3 : {return X[(mid+1+N)/2]*3/4;break;}
}
t+=hasil;
}
cout<<t;
}

MAXSECOND
#include<iostream>
#include<stdlib.h>
#include<conio.h>
#include<time.h>

using namespace std;

main() {
   int i,n,max,second,x[100];

   cout<<"masukkan banyak data : ";cin>>n;
   srand((unsigned)time(NULL));
   for (i=1;i<=n;i++) {
        x[i]=rand()%10+1;
        cout<<x[i]<<" ";
        if (i%10==0) cout<<endl;
    }
   cout<<endl;
   if(x[1]>x[2]){ max=x[1];second=x[2];}
   else if (x[1]<x[2]){ max=x[2];second=x[1];}
       else { max=x[1];second=-1;}
   for (i=3;i<=n;i++){
      if (x[i]>=max) {if (x[i]!=max) second=max;max=x[i];}
      else if(x[i]>second) second=x[i];
    }
   cout<<"data max adalah : "<<max<<endl;
   cout<<"data second adalah : "<<second<<endl;

   getch();
}
Program MAXsecond
#include<iostream>
#include<stdlib.h>
#include<conio.h>
#include<time.h>

using namespace std;

main() {
   int i,n,max,second,x[100];

   cout<<"masukkan banyak data : ";cin>>n;
   srand((unsigned)time(NULL));
   for (i=1;i<=n;i++) {
        x[i]=rand()%10+1;
        cout<<x[i]<<" ";
        if (i%10==0) cout<<endl;
    }
   cout<<endl;
   if(x[1]>x[2]){ max=x[1];second=x[2];}
   else if (x[1]<x[2]){ max=x[2];second=x[1];}
       else { max=x[1];second=-1;}
   for (i=3;i<=n;i++){
      if (x[i]>=max) {if (x[i]!=max) second=max;max=x[i];}
      else if(x[i]>second) second=x[i];
    }
   cout<<"data max adalah : "<<max<<endl;
   cout<<"data second adalah : "<<second<<endl;

   getch();
}
 


Program Segitiga
#include<iostream>
#include<conio.h>
#include<math.h>
#include<stdlib.h>
#include<time.h>
using namespace std;

struct titik {float x,y;};

main() {
   float m1,m2,p1,p2,p3;
   titik p,q,r;
   srand((unsigned)time(NULL));
   p.x=rand()%10+1;p.y=rand()%10+1;
   q.x=rand()%10+1;q.y=rand()%10+1;
   r.x=rand()%10+1;r.y=rand()%10+1;
   p.x=0;p.y=0;q.x=4;q.y=0;r.x=12;r.y=0;//sqrt(12);
   cin>>p.x>>p.y; cin>>q.x>>q.y;cin>>r.x>>r.y;
   cout<<"("<<p.x<<","<<p.y<<")";
   cout<<"("<<q.x<<","<<q.y<<")";
   cout<<"("<<r.x<<","<<r.y<<")";
   cout<<endl;
   if(q.x-p.x!=0) m1=(float)(q.y-p.y)/(q.x-p.x);else m1=100000000;
   if(r.x-q.x!=0) m2=(float)(r.y-q.y)/(r.x-q.x);else m1=100000000;
   if (m1==m2) cout<<"SEGARIS";
   else {
      p1=sqrt(pow(q.x-p.x,2)+pow(q.y-p.y,2));
      p2=sqrt(pow(r.x-q.x,2)+pow(r.y-q.y,2));
      p3=sqrt(pow(p.x-r.x,2)+pow(p.y-r.y,2));
      cout<<p1<<" "<<p2<<" "<<p3;

      if (p1==p2&&p2==p3) cout<<"SAMASISI";
       else if(p1==p2||p1==p3||p2==p3) cout<<"SAMAKAKI";
         else cout<<"SEMBARANG";
   }
   getch();
  
}

RECORD
#include<iostream>
#include<string.h>
#include<conio.h>
using namespace std;

typedef
 struct {
     string kode,nama_matkul;
     int sks;
     char nilai;
  } matkul;

typedef matkul larik[100];

int n,i,nil;
larik x;
float t=0,ts=0,ip;

main(){
 cout<<"banyak matakuliah : ";cin>>n;     
 for (i=1;i<=n;i++) {
   x[i].sks=rand()%3+1;
   x[i].nilai=65+rand()%2;
   cout<<x[i].sks<<"  "<<x[i].nilai<<endl;
 }
 for (i=1;i<=n;i++) {
      nil=4-(x[i].nilai-65);//konversi
      t+=x[i].sks*nil;
      ts+=x[i].sks;
  }  
  ip=(float)t/ts;   
  cout<<"IP  ="<<ip;
  getch();
}
RECORD PELAMAR
#include<iostream>
#include<string.h>
#include<conio.h>
#include<stdlib.h>
using namespace std;
typedef
  struct {
         int tpa,toefl,integritas,total;
         } nilai;
typedef
 struct {
     string nama, notes;
     nilai nilaites;
  } pelamar;
typedef pelamar larik[100];
main(){
 int cc,n,i,j;char c;pelamar t;
 larik x;
 cout<<"banyak pelamar : ";cin>>n;
 for (i=1;i<=n;i++) {
   c=(48+rand()%10);
   x[i].notes = "PA00" ;
   x[i].notes +=c;
   x[i].nilaites.tpa=rand()%600+1;
   x[i].nilaites.toefl=rand()%700+1;
   x[i].nilaites.integritas=50+rand()%45;
   x[i].nilaites.total=x[i].nilaites.integritas+x[i].nilaites.tpa+x[i].nilaites.toefl; }
 for (i=1;i<=n-1;i++)
  for (j=i+1;j<=n;j++)
   if (x[i].nilaites.total<x[j].nilaites.total) {
      t=x[i];x[i]=x[j];x[j]=t;}
 for (i=1;i<=n;i++)
    cout<<x[i].nilaites.integritas<<"  "<<x[i].nilaites.total<<endl;
  cout<<"Pelamar yang diterima : "<<endl;
  i=1;cc=1;
  while (i<=n&&cc<=3){
    if (x[i].nilaites.integritas>=90) { cc++;
       cout<<x[i].nilaites.integritas<<"  "<<x[i].nilaites.total<<endl;
       }
    i++;
  }
 getch();}
1.1    Penerjemah Bahasa Pemrograman
Sebagaimana telah dijelaskan sebelumnya, instruksi atau program yang telah ditulis dengan bahasa pemrograman tingkat tinggi perlu diterjemahkan dahulu ke dalam bahasa mesin untuk dapat dieksekusi oleh komputer.
Kompiler (compiler), merupakan program yang menterjemahkan program yang ditulis di dalam bahasa pemrograman tingkat tinggi me suatu himpunan instruksi mesin spesifik yang disimpan dalam bentuk file. Selain kompiler terdapat program penterjemah yang lain ialah interpreter. Interpreter digunakan untuk menterjemahkan program yang ditulis dalam bahasa tingkat tinggi ke dalam bahasa mesin, dan menjalankannya baris demi baris.
Perbedaan antara kompiler dan interpreter antara lain adalah sebagai berikut:
Kompiler
Interpreter
-   Menterjemahkan program sebelum dijalankan
-   Menterjemahkan program pada saat dijalankan
-   Penterjemahan bersifat tetap
-   Penterjemahan bersifat sementara
-   Kesalahan penulisan diketahui setelah proses kompilasi
-   Kesalahan penulisan langsung diberitahukan
-   Perbaikan program dilakukan dengan kembali ke pengedit teks program
-   Perbaikan program dapat langsung dilaksanakan
Gambar 1.2 Perbedaan kompiler dan interpreter.
Sehubungan dengan perbedaan di atas, maka pelaksanaan program dengan menggunakan interpreter maupun dengan kompiler dapat digambarkan pada Gambar 1.3 berikut:
 
















Program dari Pak janu
  1. Array Awal
#include<iostream>
#include<stdlib.h>
#include<conio.h>
using namespace std;

main() {
   int i,j,k=0,l,c,n,max,min,x[100],t[20];bool ada;
   cout<<"masukkan banyak data : ";
   cin>>n;
   //srand(time(NULL));
   for (i=1;i<=n;i++) {
        x[i]=rand()%100+1;
        cout<<x[i]<<" ";
        if (i%10==0) cout<<endl;
    }
   cout<<endl;
   max=x[1];min=x[1];
   for (i=2;i<=n;i++){
      if (x[i]>max) max=x[i];
      else if(x[i]<min) min=x[i];
    }
   getch();
   cout<<"data max adalah : "<<max<<endl;
   cout<<"data min adalah : "<<min<<endl;

   cout<<"data yang duplikasi :"<<endl;

   for (i=1;i<=n-1;i++)
    for (j=i+1;j<=n;j++)
      if (x[i]==x[j]) {c=x[i];ada=false;
          for(l=1;l<=k;l++) if(t[l]==c) ada=true;
          if(ada==false) {k++; t[k]=c;}
          } 
         
   for(i=1;i<=k;i++) cout<<t[i]<<" ";        
   cout<<endl;
   
   getch();
}
2. Prima OKe
#include<iostream.h>
 #include<math.h>
 #include<conio.h>
Using namespace std;

main()
{int N,p;
 bool prima;
 cout<<"masukkan bilangan bulat positif : ";
  cin>>N;
  if ((N==2)||(N==3)) prima=true;
  else if ((N%2==0)||(N<2)) prima=false;
       else
       { p=3;prima=true;
                  do {
                     if ((N%p)==0)  prima=false; else p=p+2;
                    }
                  while ((prima!=false)&&(p<=(sqrt(N)+1)));
       }
  if (prima==true) cout<<"\nbilangan yang anda masukkan adalah PRIMA";
  else cout<<"\nbilangan yang anda masukkan adalah BUKAN PRIMA";
  getch();
}

3) Prima Nontype
#include<iostream>
#include<string.h>
#include<conio.h>
#include<stdlib.h>
using namespace std;

int main()
{int N,p;
 bool prima;
 cout<<"masukkan bilangan bulat positif : ";
cin>>N;
  if ((N==2)||(N==3)) prima=true;
  else if ((N%2==0)||(N<2)) prima=false;
       else
       { p=3;prima=true;
                  do {
                     if ((N%p)==0)  prima=false; else p=p+2;
                    }
                  while ((prima!=false)&&(p<=N-2));
       }
  if (prima==true) cout<<"\nbilangan yang anda masukkan adalah PRIMA";
  else cout<<"\nbilangan yang anda masukkan adalah BUKAN PRIMA";
  getch();
}

4) Prima01
#include<iostream>
 #include<conio.h>
using namespace std;
main()
{int N,p;
 bool prima;
  cout<<"masukkan bilangan bulat positif : ";
  cin>>N;
  if ((N==2)||(N==3)) prima=true;
  else if ((N%2==0)||(N<2)) prima=false;
       else
       {  prima=true;
                  for(p=3;p<=N-2;p+=2){
                     if ((N%p)==0)  prima=false;
                    }
       }
  if (prima==true) cout<<"\nbilangan yang anda masukkan adalah PRIMA";
  else cout<<"\nbilangan yang anda masukkan adalah BUKAN PRIMA";
  getch();
}

5) Prima Juga
#include<iostream>
 #include<conio.h>
using namespace std;
main()
{ int N,p;
  bool prima;
  cout<<"masukkan bilangan bulat positif : ";
  cin>>N;
 
  prima=true;
  for(p=2;p<=N-1;p++)
     if (N%p==0) prima=false;
   
  if (prima==true) cout<<"\nbilangan yang anda masukkan adalah PRIMA";
  else cout<<"\nbilangan yang anda masukkan adalah BUKAN PRIMA";
  getch();
}
6) Modus 001
#include<iostream>
#include<string.h>
#include<conio.h>
#include<stdlib.h>
using namespace std;

typedef int larik[300000];

int i,j,n=0,m;
larik x,y;
 
void bacadata(larik x,int &n)
{//srand(time(NULL));
  cout<<"banyak data :";cin>>n;
  for (i=1;i<=n;i++) {
    x[i]=rand()%100+1;
  }
}

void sort(larik x,int n)
{ int t;
  for (i=1;i<=n-1;i++)
   for (j=i+1;j<=n;j++)
     if(x[i]>x[j]) {t=x[i];x[i]=x[j];x[j]=t;
  }
}

void cetak(larik x,int n)
{int t;
  for (i=1;i<=n;i++) {cout<<x[i]<<" ";}
  cout<<"\n";
  getch();
}

void modus(larik x,int n)
{int F[101],max;
   for (i=1;i<=100;i++) F[i]=0; //memberi nilai awal F
   for (i=1;i<=n;i++) F[x[i]]++; 
   max=F[1];
   for (i=2;i<=100;i++) if (F[i]>max) max=F[i];
   if (max==1) cout<<"tidak ada modus";
    else {
      cout<<"modusnya adalah : ";
      for (i=1;i<=100;i++)if (F[i]==max) cout<<i<<", ";
    }
 }

float rerata(larik x,int n)
{ int sum=0;
  for (i=1;i<=n;i++) sum+=x[i];
  return (float)sum/n;
}

void ratadev(larik x,int n,float &r,float &sd, float &sum)
{sum=0;
  r=rerata(x,n);
  sum=0;
  for (i=1;i<=n;i++) sum+=(x[i]-r)*(x[i]-r);
  cout<<sd=sqrt(sum/(n));
}

main()
{ float r,sd;
  bacadata(y,n);
  sort(y,n);
  cetak(y,n);
  modus(y,n);
  ratadev(y,n,r,sd);
  cout<<"\nRata-rata ="<<r;
  cout<<"\nStandar deviasi ="<<sd;
  getch();
}

7) FPB
#include<iostream>
 #include<conio.h>
 #include<stdlib.h>
using namespace std;

int main()
{ int a,b,min,fpb;
  cout<<"masukkan 2 bilangan bulat positif : ";
  cin>>a>>b;
  if (a<b) min=a;else min=b;
  fpb=min;
  while((a%fpb!=0)||(b%fpb!=0)) {fpb--;}
   
  cout<<"FPB = "<<fpb;
  getch();
}

8) RECORD Pelamarsub
#include<iostream>
#include<string.h>
#include<conio.h>
#include<stdlib.h>
using namespace std;

typedef
  struct {
         int tpa,toefl,integritas,total;
         } nilai;
typedef
 struct {
     string nama, notes;
     nilai nilaites;
  } pelamar;

typedef pelamar larik[100];

int i;

void buatdata(larik x,int &n) {
 char c;
 cout<<"banyak pelamar : ";cin>>n;     
 for (i=1;i<=n;i++) {
   c=(48+rand()%10); 
   x[i].notes = "PA00" ;
   x[i].notes +=c; 
   x[i].nilaites.tpa=rand()%600+1;
   x[i].nilaites.toefl=rand()%700+1;
   x[i].nilaites.integritas=50+rand()%45;
   x[i].nilaites.total=x[i].nilaites.integritas+x[i].nilaites.tpa+x[i].nilaites.toefl;
 }
}

void sort(larik x,int n){
 int j;pelamar t;   
 for (i=1;i<=n-1;i++)
  for (j=i+1;j<=n;j++)
   if (x[i].nilaites.total<x[j].nilaites.total) {
      t=x[i];x[i]=x[j];x[j]=t;}
}

void diterima(larik x,int n,int &cc){   
// for (i=1;i<=n;i++)
//    cout<<x[i].nilaites.integritas<<"  "<<x[i].nilaites.total<<endl;
    
  cout<<"Pelamar yang diterima : "<<endl;
  i=1;cc=0;
  while (i<=n&&cc<3){
    if (x[i].nilaites.integritas>=90) { cc++;
       cout<<x[i].nilaites.integritas<<"  "<<x[i].nilaites.total<<endl;
       }
    i++;  
  }
}

void nilaiter(larik x,int n,int &t,int &r){
  t=x[1].nilaites.total;
  r=x[n].nilaites.total;
}   

float nilairerata(larik x,int n){
 int sum=0;
 for(int i=1;i<=n;i++) sum+=x[i].nilaites.total;    
  return (float)sum/n;
}  

main(){    
 int n,m=0,t,r;
 larik x;
 buatdata(x,n);
 sort(x,n);
 diterima(x,n,m);
 cout<<"banyaknya yg diterima = "<<m;
 nilaiter(x,n,t,r);
 cout<<"\nNilai tertinggi = "<<t;
 cout<<"\nNilai terendah = "<<r;
 cout<<"\nNilai rata-rata = "<<nilairerata(x,n);
 getch();
}

8) Record KHS
#include<iostream>
#include<string.h>
#include<conio.h>
using namespace std;

typedef
 struct {
     string kode,nama_matkul;
     int sks;
     char nilai;
  } matkul;

typedef matkul larik[100];

 int n,i,j,nil;
 larik x;char c;
 float t=0,ts=0,ip;
 matkul a;

main(){char c;
 cout<<"banyak matakuliah : ";cin>>n;     
 for (i=1;i<=n;i++) {
   x[i].kode="VMU ";
   for (j=1;j<=4;j++) {
     if (j==1) c=49+rand()%3; else c=48+rand()%7;
     x[i].kode+=c;;
   } 
   x[i].sks=rand()%3+1;
   x[i].nilai=65+rand()%4;
  }
  for (i=1;i<=n;i++) {
      nil=4-(x[i].nilai-65);//konversi
      t+=x[i].sks*nil;
      ts+=x[i].sks;
   }  
  ip=(float)t/ts;   

    for(int i=0;i<=n-1;i++)
      for (int j=i+1;j<=n;j++)  {
        if (x[i].sks > x[j].sks) {
              a=x[i]; x[i]=x[j];x[j]=a;
        }
     }
   
    cout<<"kode MK   sks  nilai"<<endl;
    for (i=1;i<=n;i++)
        cout<<x[i].kode<<"   "<<x[i].sks<<"   "<<x[i].nilai<<endl;
    cout<<endl;
    cout<<"Indeks Prestasi  = "<<ip;
    getch();
}

9) Konversi IP
#include<iostream>
#include<string.h>
#include<conio.h>
#include<stdlib.h>
using namespace std;

typedef
 struct {
     string kode,nama_matkul;
     int sks;
     char nilai;
  } matkul;

typedef matkul larik[100];

int n,i,nil;
larik x;
float t=0,ts=0,ip;

main(){
 cout<<"banyak matakuliah : ";cin>>n;     
 for (i=1;i<=n;i++) {
   x[i].sks=rand()%3+1;
   x[i].nilai=65+rand()%2;
   cout<<x[i].sks<<"  "<<x[i].nilai<<endl;
 }
 for (i=1;i<=n;i++) {
      nil=4-(x[i].nilai-65);//konversi
      t+=x[i].sks*nil;
      ts+=x[i].sks;
  }  
  ip=(float)t/ts;   
  cout<<"IP  ="<<ip;
  getch();
}
10)Record HP
#include<iostream>
#include<string.h>
#include<conio.h>
#include<stdlib.h>
using namespace std;

typedef
  struct {
         string hp,nama,kartu;
          } kontak;
typedef kontak larik[100];

int i,kk=0;

void buatdata(larik x,int &n) {
 char c,d,e;int k,i,j;bool b,cek[10];
 cout<<"banyak kontak : ";cin>>n;     
 srand(time(NULL));
 for (i=1;i<=n;i++) {
  x[i].hp = "+628" ;
  for(j=0;j<10;j++) {
   c=rand()%9;
   x[i].hp +=49+c;
  } 
  x[i].nama = "" ;
  for(j=0;j<10;j++) {
   d=(65+rand()%20);
  if(rand()%5==0&&j>4) x[i].nama +=" "; 
   x[i].nama +=d;
   }
   x[i].kartu="";
  }
}

void sort(larik x,int n){
 int i,j;kontak t;   
 for (i=1;i<=n-1;i++)
  for (j=i+1;j<=n;j++)
   if (x[i].kartu > x[j].kartu) {
      t=x[i];x[i]=x[j];x[j]=t;}
}
void sortN(larik x,int m,int n){
 int i,j;kontak t;
 if(m<n) {  
  for (i=m;i<=n-1;i++)
   for (j=i+1;j<=n;j++)
   if (x[i].nama > x[j].nama) {
      t=x[i];x[i]=x[j];x[j]=t;}
    }
}

void cetak(larik x,int n){
 int i,j,p;       
 for (i=1;i<=n;i++) {
    cout<<x[i].nama<<"  "<<" "<<x[i].hp<<" "<<x[i].kartu;
    cout<<endl;
  } 
    cout<<endl;
}
void Goperator(larik x,int n){
 int i;
 for (i=1;i<=n;i++){
   if (x[i].hp[4]==49 && x[i].hp[5]==49) x[i].kartu+="Halo";else
   if (x[i].hp[4]==49) x[i].kartu+="Simpati";else
   if (x[i].hp[4]==53 && x[i].hp[5]==50) x[i].kartu+="As";else
   if (x[i].hp[4]==55 || (x[i].hp[4]==49&&x[i].hp[5]==56)) x[i].kartu+="XL";else
   if (x[i].hp[4]==51) x[i].kartu+="Axis";else
   if (x[i].hp[4]==57) x[i].kartu+="Three";else
   if (x[i].hp[4]==53 || x[i].hp[4]==54) x[i].kartu+="M3";else
    x[i].kartu+="Operator lain";
  } 
}
void group(larik x,int n){
 int i,j=1,m=1,p;x[n+1].kartu=x[n].kartu+"k";
 for (i=1;i<=n;i++){
   if (x[i].kartu==x[i+1].kartu) {j++;} else {
     p=j;
     sortN(x,m,p);
     m=i+1;j=m;
   }
  } 
}

main(){    
 int n;
 larik x,y,z;
 buatdata(x,n);
 Goperator(x,n);
 sort(x,n);
 cetak(x,n);
 group(x,n);
 cetak(x,n);
 getch();
}
11) Prima Wilson
#include<iostream>
#include<stdlib.h>
#include<conio.h>
using namespace std;

long int faktorial(int n)
{long int fak=1;
 for(int i=1;i<=n;i++) fak=fak*i;
 return fak;
}

main()
{int N;
 bool prima;
  cout<<"masukkan bilangan bulat positif : ";
  cin>>N;
  cout<<"faktorial "<<N-1<<" =  "<<faktorial(N-1)<<endl;
 
  if ((faktorial(N-1)+1)%N==0) prima=true; else prima=false;
 
  if (prima==true) cout<<"\nbilangan yang anda masukkan adalah PRIMA";
  else cout<<"\nbilangan yang anda masukkan adalah BUKAN PRIMA";
  getch();
}

11) Modus
#include<iostream>
#include<string.h>
#include<conio.h>
#include<stdlib.h>
using namespace std;

typedef int larik[100];

int i,j,n;
larik x;
int pr;

void bacadata(larik x,int &n)
{ srand(time(NULL));
  cout<<"banyak data :";cin>>n;
  for (i=1;i<=n;i++) {
    x[i]=rand()%10+1;
  }
}

void cetak(larik x,int n)
{
  for (i=1;i<=n;i++) {cout<<x[i]<<" ";}
  cout<<"\n";
  getch();
}

void sortI(larik x,int n)
{int i,j,a;
    for(int i=2;i<=n;i++){
      j=i-1;a=x[i];
      while (j>0 && x[j]>a)
       { x[j+1]=x[j]; 
         j--;
       }
       x[j+1]=a;
     }
}

void tukar(int &a,int &b)
{int t;
  t=a;a=b;b=t;
}
//subprogram tukar yg salah
void tukar1(int a,int b)
{int t;
  t=a;a=b;b=t;
}

void sortS(larik x,int n)
{int t ;
 for (i=1;i<=n-1;i++)
  for (j=i+1;j<=n;j++) {
   if (x[i]>x[j]) tukar(x[i],x[j]);
  }
}
   
void sortB(larik x,int n)
{int t ;
 for (i=1;i<=n-1;i++)
  for (j=1;j<=n-i;j++) {
   if (x[j]>x[j+1]) tukar(x[j],x[j+1]);
  }
}

void modus(larik X,int n)
{larik Y,F;
 int j,m,max;
   for (i=1;i<=n;i++) {F[i]=1;} //memberi nilai awal F

   j=1; X[n+1]=X[n]+1;
   for (i=1;i<=n;i++){
     if (X[i]==X[i+1]) F[j]++;
     else {Y[j]=X[i];j++;}
   }
   m=j-1;

   max=F[1];
   for (i=2;i<=m;i++) if (F[i]>max) max=F[i];

   if (max==1) cout<<"tidak ada modus";
    else {
      cout<<"modusnya adalah : ";
      for (i=1;i<=m;i++)
                 if (F[i]==max) cout<<Y[i]<<", ";
    }
   getch();
 }

float rerata(larik x,int n)
{ int sum=0;pr=0;
  for (i=1;i<=n;i++) sum=sum+x[i];
  return (float)sum/n;
}

main()
{
  bacadata(x,n);
  cetak(x,n);
  sortI(x,n);
  cetak(x,n);
  modus(x,n);
  cout<<"\nrata-rata = "<<rerata(x,n);
  getch();
}

11) Lingkaran
#include<iostream>
#include<stdlib.h>
#include<conio.h>
#include<time.h>
using namespace std;

struct lingkaran {float x,y,r;};
      
main() {
   float jtp,tj;
   lingkaran L1,L2;
   srand(time(NULL));
   L1.x=rand()%100/4.0;L1.y=rand()%100/4.0;L1.r=rand()%100/5+1;
   L2.x=rand()%100/8.0;L2.y=rand()%100/8.0;L2.r=rand()%100/5+1;

   cout<<"("<<L1.x<<","<<L1.y<<") R = "<<L1.r<<endl;
   cout<<"("<<L2.x<<","<<L2.y<<") R = "<<L2.r<<endl;
   cout<<endl;
   jtp=sqrt(pow(L2.x-L1.x,2)+pow(L2.y-L1.y,2));
   tj=L1.r+L2.r;
   cout<<jtp<<" "<<tj<<endl;
   if(jtp==tj) cout<<"Bersinggungan";
    else
     if(jtp>tj) cout<<"Saling Lepas";
       else
         if (jtp < fabs(L1.r-L2.r)) cout<<"di dalam";
         else cout<<"berpotongan";
   getch();
}

12)FPB dan KPK
#include<iostream>
#include<stdlib.h>
#include<conio.h>
#include<time.h>
using namespace std;
main()
{ int x,y,a,b,r,fpb,kpk;

  cout<<"masukkan 2 bilangan bulat positif : ";
  cin>>a>>b;x=a;y=b;
  do{
   r=b%a;
   b=a;
   a=r;
   }while(r!=0);
  fpb=b; 
  cout<<"FPB = "<<fpb<<endl;
  cout<<"KPK = "<<x*y/fpb;
 
  getch();
}
13) KPK
#include<iostream>
#include<stdlib.h>
#include<conio.h>
#include<time.h>
using namespace std;
main()
{ int a,b,max,kpk;

  cout<<"masukkan 2 bilangan bulat positif : ";
  cin>>a>>b;
  if (a<b) max=b;else max=a;
  kpk=max;
  while((kpk%a!=0)||(kpk%b!=0)) {kpk++;}
string hasil="";
char t;

main() {
   cout<<"masukkan bilangan desimal positif : ";cin>>D;
   cout<<"masukkan basisnya         : ";cin>>b;
   while (b>1 && D>0) {
        sisa=D%b;
        if (sisa<10) t=sisa+48; else t=sisa+55;
        hasil = t+hasil;
        D=D/b;
   }
   cout<<"hasil konversinya adalah : "<<hasil;
   getch();
}

 
   
  cout<<"KPK = "<<kpk;
  getch();
}

14) Basis Konversi Bilangan
#include<iostream>
#include<stdlib.h>
#include<conio.h>
#include<time.h>
using namespace std;

long long D;
int b,sisa;



Binary operator

            Digunakan untuk mengoperasikan dua buah operand. Operand dapat berbentuk konstanta ataupun variabel. Operator ini digunakan untuk operasi aritmatika yang berhubungan dengan nilai tipe data integer dan real.

Operator

Operasi
Tipe operand
Tipe hasil
*
Perkalian
real,real
integer,integer
real,integer
real
integer
real
DIV
Pembagian bulat
integer,integer
integer
/
Pembagian real
real,real
integer,integer
real,integer
real
real
real
MOD
Sisa pembagian
integer,integer
integer
+
Pertambahan
real,real
integer,integer
real,integer
real
integer
real
-
pengurangan
real,real
integer,integer
real,real
real
integer
real

Bitwise operator

f:=a xor b; writeln('5 xor 15 =',f);/10
f:=a or b; writeln('5 or 15 =',f);/15
f:=a and b; writeln('5 and 15 =',f);/5
f:=a or b or c; writeln('5 or 15 or 32 =',f);/47
f:=a shl 1; writeln('5 shr 1 =',f);/10
f:=b shr 3; writeln('15 shl 3 =',f);/1
readln;
end.

 
program wise;
uses crt;
var a,b,c,f:integer;

begin
a:=5;
b:=15;
c:=32;

 
            Digunakan untuk operasi bit per bit pada nilai integer. Terdiri dari operator NOT, AND, OR, XOR, Shl, Shr.








Relational operator                               

            Relational operator digunakan untuk  membandingkan hubungan antara dua buah operand dan akan didapatkan hasil tipe boolean, yaitu True atau False. Terdiri dari operator : =, <, >, <=, >=, <>

Logical operator

            Terdapat 4 buah logical operator yaitu : NOT, AND, OR dan XOR. Operator ini bekerja dengan nilai-nilai logika, yaitu True dan False.

Set operator

            Digunakan untuk operasi himpunan.

String operator

            Digunakan untuk operasi string. Hanya ada sebuah operator string saja, yaitu operator + yang digunakan untuk menggabungkan dua buah nilai string.
program bublesort;
uses crt;
var A:array[1..100] of integer;
i,j,k,x,y,z,n:integer;

begin
write('Jumlah data : ');readln(n);
for i:=1 to n do begin write('Data ke-',i,' : '); readln(A[i]); end;

for i:=1 to n do
    for j:=1 to n-i do
    if A[j]>A[j+1] then begin x:=A[j]; A[j]:=A[j+1]; A[j+1]:=x; end;

for i:=1 to n do write(A[i],' ');
readln;
end.
 
program acak;
uses crt;
var A:array[1..20] of integer;
i,j,k:integer;

begin
randomize;
for i:=1 to 20 do
  repeat begin
    A[i]:=random(9001)+1000; k:=0;
    for j:=1 to i-1 do if A[i]=A[j] then k:=k+1;
    end;
  until (k=0);

for i:=1 to 20 do begin write(A[i],' ');
 if i mod 10=0 then writeln; end;
readln;
end.
 


Komentar

Postingan populer dari blog ini

Computer Science

“ Why I Chose Computer Science as My Major “   Computer is one of wonderfull things in our world. Why is it?Because by computer existence of computer, we can increase our science and technology, eficience and live performance, and capable make the modern human civilization. With the presence of computer can deliver human’s living more dominant with computerized and website developed. Maybe, if the computer in our world never invent before, so the developing human civilization is inhibited. In science college in Indonesia, there is science who studied about computer, such as : Informatics engineering, Management of informatic, Computer Engineering, Computer Science etc. We know that everybody will have the great salary from their job. Actually, many people choose the best education for getting the best job too. And one of knowledge which study of computer are computing, hardware, and software. Computer science have incuded many kinds of topics that link with computer, star...

Dongeng si kabayan

sumber :encrypted-tbn3.gstatic.com Heay .. Geeess.. laman ini memang sengaja dibuat untuk kumpulan cerita-cerita dongeng yang asyik dan menarik untuk dibaca, ya yang satu ini cukup menghibur diri cerita tentang si Kabayan dari Jawa Timur. :) SI KABAYAN & NANGKA TUA Pada suatu hari, si Kabayan yang kerjaannya males-malesan, ditegor sama mertuanya.  Umi : "Heh..kabayan..sare wae pagawean maneh teh..!".  Kabayan : "Yaelah Umiiii...mau ngapain?? Sawah ge baru aja panen!" si Kabayan menyahut.  Umi : "Heeuuhh...borokokok..maneh mah alasan wae. Tolong Umi lah wae lahh!".  Kabayan : "Naon Umi??" kata si Kabayan sambil menguap.  Umi : "Pangngalakeun nangka di kebon tah..ngala nangka-na nu gede jeung geus kolot nya!!"(ngala = metik)    Berangkat deh dengan sedikit bete si Kabayan ke kebon. Sesampainya di kebon, kabayan langsung mencari buah nangka yang udah tua. Setelah agak lama mencari, ketemu deh nangka yang udah ...

Share aja, entah apa ini..

entah apa yang saya tulis.. ya, kenalkanku dudung, anak ingusan yang kini sudah genap 22 tahun. Sebenarnya masih terpikir, kehidupan ini sebenarnya untuk apa dan bagaimana harus kusikapi semua ini. Yakin akan segalanya, tapi yang kurasakan aku sendiri yang tidak yakin pada diriku. baru saja aku review, masa lalu ku yang kelam. Ya, sangat kelam. Kehidupan mengajarkan kekerasan, tapi kehidupan juga mengajarkan kepadaku ketidak berdayaanku. Masih trauma, mendalam banget kalau diceritakan. kehidupanku begitu asyik kalau diterjemahkan dalam kata-kata. tapi aku sendiri yang enggan untuk berbicara. Ya seperti yang sudah kusebutkan tadi bahwa kehidupanku mengajarkan kelemahan. Bunga tacuk, buna yang indak untuk bertacuk, tapi semuanya apalah. 17 tahun yang lalu masih ingat, sekolahku, ya TK Saverius Bandar Lampung, aku sekolah di sana. Papa, Mama, Mak Enong, Mas Bowo, ataupun Beni, tapi aku enggan mengingatnya. Mereka keluargaku. Masih ingat ulang tahun kelima-ku, saat perayaan ist...