TERJEMAHKAN KEDALAM BAHASA PASCAL
//Program pencarian bagi dua
//Nama file bagidua.cpp
#include <stdio.h>
#include <conio.h>
int main()
{
int X,i,j,k,p;
int L[10] = {12,14,15,17,23,25,45,67,68,70};
if(L[0]<L[9])
{
printf("Data terurut menaik \n");
p=0;
}
else
{
printf("Data terurut menurun \n");
p=1;
}
printf("Data yang akan dicari = ");scanf("%d",&X);
i = 0;
j = 0;
do
{
k = (i+j)/2;
if (p==0)
{
if(L[k]==X)
{
printf("data ditemukan di elemen %d",k);
getch();
return 0;
}
else if (L[k]<X)
{
i=k;
}
else
{
j=k;
}
}
else
{
if(L[k]==X)
{
printf("Data ditemukan di elemen %d",k);
getch();
return 0;
}
else if(L[k]>X)
{
i=k;
}
else
{
j=k;
}
}
}
while(k!=0);
printf("Data tidak ditemukan !");
getch();
return 0;
}
Tidak ada komentar:
Posting Komentar