JoKeR...daN Arti SebuAh Kata

Tugas Day 14

2009-12-28T06:11:00.000-08:00

1.Bilangan Prima
Algoritma:
-Masukkan bilangan
-Cari faktor bilangan tersebut dengan pembagian
-Apabila faktor dari bilangan tersebut ada 2,yaitu 1 dan bilangan itu sendiri, maka bilangan itu adalah bilangan prima
-Jika tidak maka bukan bilangan prima
-Cetak Hasil
-End

Listing Program:

#include

main()

{

int n,i,fak=0;

puts("Program Menunjukkan Bilangan Prima");

puts("==================================");

printf("Silahkan Masukkan Bilangan = ");

scanf("%d",&n);

for(i=1;i<=n;i++)

{

if(n%i==0)

{

fak=fak+1;

}

printf("Bilangan : ");

if(fak==2)

printf("%d adalah bilangan prima\n",n);

else

printf("\n%d bukan bilangan prima\n\n\n",n);

}

Output:

Flowchart:

2.Menghitung Penjumlahan Matriks
Algoritma
a. deklarasikan i, j, dan a, b, c sebagai array [2][2].
b. untuk i=0, i<2 dan j=0, j<2 input matriks A
c. untuk i=0, i<2 dan j=0, j<2 input matriks B
d. untuk i=0, i<2 dan j=0, j<2 hitung c[i][j]=a[i][j]+b[i][j], lalu cetak matriks C.
e. cetak hasil.

Listing Program:
#include
main()
{
int M1[2][2],M2[2][2],M3[2][2],i,j,k,l,a,b,c,d;
puts("===========================");
puts("Program Penjumlahan Matriks");
puts("===========================");

for(i=0;i<2;i++)
{
for(j=0;j<2;j++)
{
printf("Masukkan matrik 1[%d][%d]= ",i+1,j+1);
scanf("%d",&M1[i][j]);
}
}
printf("\n");
for(k=0;k<2;k++)
{
for(l=0;l<2;l++)
{
printf("Masukkan matrik 2[%d][%d]= ",k+1,l+1);
scanf("%d",&M2[k][l]);
M3[k][l]=M1[k][l]+M2[k][l];
}
}
printf("\n");
for(a=0;a<2;a++)
{
for(b=0;b<2;b++)
{
printf("%3d",M1[a][b]);
}
printf("\t");
for(c=0;c<2;c++)
{
printf("%3d",M2[a][c]);
}
printf("\t");
for(d=0;d<2;d++)
{
printf("%3d",M3[a][d]);
}
printf("\n");
}
printf("\n");
}

Flowchart:

Output:

3.Perkalian Matriks
Algoritma
1.Deklarasikan variable M1[2][3],M2[3][2],M3[2][2],I,J,K,L,M,N,A,B,C,,Hsl
2.Untuk I=0 sampai I=2,lakukan proses berikut;
a.Untuk J=0 sampai J<3,lakukan proses berikut;
-Masukkan M1[I][J]
-Apakah J<0,jika ya kembali ke proses no.2a jika tidak lanjut ke proses no.2b
3.Untuk K-0 sampai K<3,lakukan proses berikut;
a.Untuk L=0 sampai L<2,Lakukan proses berikut;
-Masukkan nilaii M2[K][L]
-apakah L<2?, jika ya kembali ke proses no.3a jika tidak lanjutkan ke proses no.3b
b.Apakah K<3 , jika ya kembali ke proses no.3 , jika tidak lanjut ke proses no.4
4.Untuk M=0 sampai M<2, lakukan proses berikut;
a.Untuk N=0 sampai N<2,lakukan proses berikut;
I.Inisisalisasi Hsl=0
II.Untuk A=0 sampai A<3,lakukan proses berikut;
-Kalikan M1[M][A] dengan M2[A][N], kemudian assign hasilnya ke variable D ( D=M1[M][A]*M2[A][N] )
-Tambahkan D dengan hasil,lalu assign ke variable Hsl(Hsl=Hsl+0)
-Apakah A<3,jika ya kembali ke proses no.4aI, jika tidak lanjutkan ke proses no.4aIII
III.Assign Hsl ke M3[M][N] (M3[M][N]=Hsl)
IV.Apakah N<2 jika ya kembali ke proses no.4a jika tidak lanjutkan proses no.4b
b.Apakah M<2? , jika ya kembali ke proses no.4 jika tidak lanjut ke proses no.5
5.Untuk B=0 sampai B<2,lakukan proses berikut ;
a.Untuk C=0 sampai C<2,lakukan proses berikut ;
-Cetak nilai M3[B][C]
-Cetak ganti baris(‘\n’)
-Apakah C<2? jika ya kembali ke proses no.5a jika tidak lanjutkan ke proses np.5b
b.Apakah B<2? Jika ya kembali ke proses no.5a jika tidak lanjut ke proses no.6
6.Cetak ganti baris(‘\n’)

Listing Program:
#include
main()
{
int M1[2][3],M2[3][2],M3[2][2];
int i,j,k,l,m,n,a,b,c,d,hsl;

puts(“Program Perkalian Matriks”);
puts(“=========================”);

for(i=0;i<2;i++)
{
for(j=0;j<3;j++)
{
printf(“Masukkan Matrik 1 [%d][%d]= “,i+1,j+1);
scanf(“%d”,&M1[i][j]);
}
}
printf(“\n”);
for(k=0;k<3;k++)
{
for(l=0;l<2;l++)
{
printf(“Masukkan Matrik 2 [%d][%d]= “,k+1,l+1);
scanf(“%d”,&M2[k][l]);
}
}
printf(“\n”);
for(m=0;m<2;m++)
{
for(n=0;n<2;n++)
{
hsl=0;
for(a=0;a<3;a++)
{
d=M1[m][a]*M2[a][n];
hsl=hsl+d;
}
M3[m][n]=d;
}
}
for(b=0;b<2;b++)
{
for(c=0;c<2;c++)
{
printf(“%4d”,M3[b][c]);
}
printf(“\n”);
}
printf(“\n”);
}

Flowchart:

Output:

Tugas Day 13

2009-12-28T05:36:00.000-08:00

1.Fibonacci
Algoritma:
-Inisalisasi int fib1,fib2,x,y,z
-Masukkan deret fibonacci
-masukkan bilangan pertama
-masukkan bilangan kedua
-for(y=3;y<=x;y++) -z=fib1+fib2 -Cetak z -fib1=fib2;fib2=z;
-End

Listing Program:
#include
main()
{
int fib1,fib2,x,y,z;

puts("Program Deret Fibonacci");
puts("=======================");

printf("Masukkan banyaknya deret fibonacci= ");
scanf("%d",&x);
printf("Masukkan bilangan pertama=");
scanf("%d",&fib1);
printf("Masukkan bilangan kedua=");
scanf("%d",&fib2);
printf("%5d",fib1);
printf("%5d",fib2);
for(y=3;y<=x;y++)
{
z=fib1+fib2;
printf("%5d",z);
fib1=fib2;
fib2=z;
}
printf("\n");
}
Flowchart:

Output:

2.Konversi Biner Ke desimal
Algoritma:
-Masukkan bilangan biner
-Misal bilangan yang dimasukkan: 0000100
-Lakukan perhitungan 2^n*digit bilangan biner yang ada
-dimulai n=0,dari ujung kanan
-jumlahkan semua
-2^2*1=4
-maka hasilnya 4
-Cetak Hasil
-End

Listing Program:
#include
#include
main()
{
int bin,b=0,c=0,d,i,j;
double z=0;
int y[8];
puts("=================================");
puts("Program Konversi Biner ke Desimal");
puts("=================================");
do
{
printf("Masukkan biner= ");
scanf("%d",&bin);
}while(bin>11111111);
for(i=0;;i++)
{
if(bin==1)
{
y[i]=bin;
c=1;
break;
}
if(bin>=10)
{
y[i]=bin%10;
b=b+1;
}
bin=bin/10;
if(bin<10)
{
y[i+1]=bin;
c=c+1;
break;
}
}
d=b+c;
for(j=0;j {
if(y[j]==0)
continue;
if(y[j]==1)
{
z=z+pow(2,j);
}
}
printf("Bilangan Desimalnya :");
printf("%.0f\n",z);
}

Flowchart:

Output:

3.Konversi Decimal Ke Biner
Algoritma:
-Masukkan bilangan decimal
-Bagi bilangan tersebut dengan 2
-Cetak sisa baginya 1 atau 0
-Bagi terus bilangan tersebut sampai habis atau sisanya 1
-Penulisan biner adalah tulis semua sisa hasil bagi dengan urutan terbalik
-End
-Contoh: bilangan=8
8/2=4 sisanya 0,4/2 sisanya 0,2/2 sisanya 0,sisa terakhir adalah 1
jadi 8=00001000(nol sebelum 1 adalah tambahan yang dimaksudkan agar genap 8 bit)

Listing Program:
#include
#define MAKS 100
main()
{
int x[MAKS],y,a=0,z,des;
puts("=================================");
puts("Program Konversi Desimal ke Biner");
puts("=================================");
do
{
printf("Masukkan bilangan desimal= ");
scanf("%d",&des);
}while(des>255);
for(y=0;x[MAKS];y++)
{
x[y]=des%2;
a=a+1;
des=des/2;
if(des<=0)
break;
}
printf("Bilangan Binernya :");

for(z=a-1;z>=0;z--)
{
printf("%d",x[z]);
}
printf("\n");
}

Flowchart:

Output:

Tugas Day 11

2009-12-28T04:26:00.000-08:00

1.Memilah Bilangan
Algoritma:
a)Inisialisasi Int bil. ,nbil,sattuan=10000
b)Input bilangan
c)apakah bil>9999,jika ya maka input salah
d)jika tidak. ketika bil>0 atau bil<0, maka n bil = bil. / satuan
bil = bil % satuan
e)Apakah n bil >0 atau n bil < 0?
f)jika ya,maka n bil = n bil*satuan
g)jika tidak, maka satuan = satuan /10. kembali ke langkah d(looping)
h)cetak hasil
i)end

Listing Program:
/*M.Afrizal F 7409030053*/
#include < stdio.h >
#include < stdlib.h >
main()
{
int bil,nbil,satuan=1000;

puts("===Program Memilah Bilangan===");

printf("\nMasukkan bilangan: ");
scanf("%d", &bil);
printf("Tampilannya adalah: ");
if (bil>9999)
{
printf("Masukan salah ");
exit(0);
}
while (bil>0 || bil<0)
{
nbil = bil / satuan;
bil = bil % satuan;
if(nbil>0 || nbil<0)
{
nbil=nbil*satuan;
printf("%d ", nbil);
}
satuan = satuan / 10;
}
printf("\n\n\n");
}

Flowchart:

Output:

2.Membalik Kalimat
Algoritma:
-Inisialisasi var I,j,jumlah=0, char kal [100]
-Input kal
-i = 0
-untuk i=0;kar[i];i++
jum=jum++
-untuk i=jum-1;i>=0;i--
cetak kar
-cetak hasil
-end

Listing Program:
#include
main()
{
int i,jum=0;char kar[100];

puts("===>>Program Membalik Kalimat<<===");

printf("\nMasukkan kalimat :");
gets(kar);
for(i=0;kar[i];i++)

jum=jum++;

printf("\nSetelah dibalik :");
for(i=jum-1;i>=0;i--)

printf("%c",kar[i]);

printf("\n\n");
}

Flowchart:

Output:

3.Membalik Bilangan
Algoritma:
-Inisialisasi int i,j,jml; char bil[50];
-Masukkan bilangan
-Jml=0;
-for (i=0;bil[i];i++), maka jml=jml++;
-for(j=jml-1;j>=0;j--),cetak bil
-End

Listing Program:
#include
main()
{
int i,j,jml;
char bil[50];

puts("===>>Program Membalik Bilangan<<===");

printf("\nInput bilangan: ");
gets(bil);
jml=0;
for (i=0;bil[i];i++)

jml=jml++;

printf("Jika dibalik menjadi:\n");
for(j=jml-1;j>=0;j--)

printf("%c",bil[j]);

printf("\n\n");
}

Flowchart:

Output:

4.Palindrom
Algoritma:
pada Fungsi main
-Inisialisasi char kalimat[100],a; int hasil;
-a=strlen(kalimat);
-hasil=palindrom(kalimat,a);
-Jika hasil==(a/2), maka termasuk palindrom,jika tidak maka bukan palindrom
Pada Fungsi Palindrom
-Inisialisasi int i,b=1,a=0
-for(i=0;i<(n/2);i++)
*Apakah kata[i]==kata[n-b]
maka a++; b++;
*jika tidak maka continue;
-return a pada variabel hasil pada fungsi main
-End

Listing Program:
#include
#include
int palindrom(char,int );

main()
{
char kalimat[100],a;
int hasil;

puts("Program Kalimat Palindrom");
puts("=========================");
printf("Masukkan kalimat= ");
gets(kalimat);
a=strlen(kalimat);
hasil=palindrom(kalimat,a);
if (hasil==(a/2))
printf("Termasuk Palindrom\n");
else
printf("Bukan Palindrom\n");
}
int palindrom(char kata[100],int n)
{
int i,b=1,a=0;
for(i=0;i<(n/2);i++)
{
if(kata[i]==kata[n-b])
{
a++;
b++;
}
else
continue;
}
return a;
}
Flowchart:

Output:

Tugas day 10

2009-12-16T04:50:00.000-08:00

1.Membuat kalkulator sederhana

*Algoritma
1.inisialisasi char=pilihan,x,y=int
2.Masukkan bilangan 1 dan 2
3.Inputkan operator
4.Lakukan operasi perhitungan
5.Cetak hasul
6.End

Koding
/* M.Afrizal F 7409030053*/
#include
main()
{
char pilihan;
int x,y;
printf("Program Kalkulator Sederhana\n");
printf("----------------------------\n");
printf("Masukkan bilangan 1=");
scanf("%d",&x);
printf("Masukkan bilangan 2=");
scanf("%d",&y);
printf("Masukkan operator=");
scanf("%c",&pilihan);
if(pilihan=='+')
printf("Hasil operasi %d dengan %d =%d\n",x,y,x+y);
else if(pilihan=='-')
printf("Hasil operasi %d dengan %d =%d\n",x,y,x-y);
else if(pilihan=='*')
printf("Hasil operasi %d dengan %d =%d\n",x,y,x*y);
else if(pilihan=='/')
printf("Hasil operasi %d dengan %d =%d\n",x,y,x/y);
else
printf("Operator yang Anda Masukkan SALAH\n");

}

screenshoot:

flowchart:

2.Segitiga Tumpukan Bilangan Ganjil

*Algoritma:
1.inisialisasi int=bil,i,j,k,l
2.Masukkan bilangan maksimumnya
3.lakukan pengulangan untuk kolom dengan ketentuan bil =1 dan kurang dari bil maksimum
4. Lalu lakukan pengulanan untuk baris dengan batas dari 1 hingga kurang dari sama dengan 2 kali pengulangan pertama dikurangi 1 untuk memperoleh bilangan ganjilnya
5.Tambahkan inputan ENTER agar hasil membentuk segitiga
6.Tampilkan hasil

Koding:
/* M.Afrizal F 7409030053*/
#include
main()
{
int bil, i, j, k, l;

printf("Masukkan bilangan maksimumnya = ");
scanf("%d", &bil);
printf("\n\n");
for(i=1;i<=bil;i++)
{
for(j=0;j<=bil-i;j++)
printf(" ");
for(k=1;k<=i;k++)
for(l=1;l<=k+i;l=l+i+1)
printf("%d", i);
printf("\n");
}
printf("\n\n");
}

Screenshoot:

Flowchart:

3.Bilangan Trianguler

*Algoritma
-inisialisasi bil,sum=0,i=int
-masukkan bilangan
-lakukan looping dengan kondisi, selama i<=bil maka i++
-sum=sum+i(masih dalam looping)
-cetak hasil
-End

Koding:
/* M.Afrizal F 7409030053*/
#include
main()
{
int i, bil, sum=0;

printf("Masukkan bilangan = ");
scanf("%d", &bil);

for(i=0;i<=bil;i++)
{
printf("%d",i);
sum=sum+i;
if(i==bil)
printf("=");
else
printf("+");
}
printf("%d",sum);
}

Screenshoot:

Flowchart:

Program untuk menentukan nilai Max dan Min dari Suatu Deret

2009-11-25T04:23:00.000-08:00

Algoritma:
1.Inisialisasi int= n,min,max,sum=0,i=0,true=1,nilai
2.Masukkan n untuk menentukan jumlah anggota himpunan
3.Masukkan anggota himpunan
4.Bandingkan anggota pertama dengan anggota kedua,anggota kedua dengan ketiga dan seterusnya.
5.Cetak nilai max dan min
6.End

Coding:
/*Mokh Afrizal F 7409030053*/
#include

main()
{
int n,min,max,sum=0,i=0,true=1,nilai;
printf("masukkan nilai n=");
scanf("%d",&n);
while(true)
{
i++;
printf("Masukkan nilai ke %d=",i);
scanf("%d",&nilai);
sum=sum+nilai;

if(i==1)
{
max=nilai;
min=nilai;
}
else if(max {

max=nilai;
}
else
min=nilai;

if(i>=n)
break;

}
{

printf("max=%d\n",max);
printf("min=%d\n",min);

}

}

Program Konversi dari Detik ke Hari,Jam,Menit dan Detik

2009-11-25T03:45:00.000-08:00

Algoritma:
1.Inisialisasi int= x,detik,menit,jam,hari,hasil1,hasil2,hasil3
2.Inputkan detik
3.Konversikan detik
4.hari=x/(3600*24)
hasil1=x%(3600*24)
jam=hasil1/3600
hasil2=hasil1%3600
menit=hasil2/60
hasil3=hasil2%60
detik=hasil3
5.Cetak hari,jam,menit,detik
6.End

Coding:
/*Mokh.Afrizal F. 7409030053*/
#include
main()
{
int x,detik,menit,jam,hari,hasil1,hasil2,hasil3;
printf("Masukkan detik=");
scanf("%d",&x);
hari=x/(3600*24);
hasil1=x%(3600*24);
jam=hasil1/3600;
hasil2=hasil1%3600;
menit=hasil2/60;
hasil3=hasil2%60;
detik=hasil3;
printf("Konversi dari %d detik adalah %d hari:%d jam:%d menit:%d detik\n",x,hari,jam,menit,detik);
}

Program Konversi Jam ke Menit

2009-11-25T03:23:00.000-08:00

Algoritma:
1.Inisialisasikan jam dan menit ke dalam tipe data int
2.Inputkan jj:mm
3.Konversikan jam ke dalam menit
4.menit=jam*60
5.Tambahkan hasil konversi dengan menit awal
6.cetak hasil

Coding:
/* M.Afrizal F. 7409030053*/
#include
main()
{
int hasil,jam,menit;
printf("Masukkan jj:mm=");
scanf("%d:%d",&jam,&menit);
hasil=jam*60;
printf("Hasil konversi %d:%d=%d",jam,menit,hasil+menit);
}

Konversi Suhu

2009-11-03T03:19:00.000-08:00

Algorimta:
* Input nilai n.
* Tentukan nilai n tersebut dalam bentuk Celcius,Fahrenheit,Kelvin atau Reamur.
* Tentukan nilai output apakah yang diinginkan.
* Masukkan n dalam rumus untuk konversi suhu.
* Jika n awal adalah Celcius lalu apakah akan diubah ke Fahrenheit,Kelvin atau Reamur.
* Demikian seterusnya hingga semua rumus untuk konversi dimasukkan.
* Hasil adalah hasil dari proses konversi sesuai input yang dimasukkan.

Coding:
/*Mokh.Afrizal 7409030053*/
#include
main()
{
int a;
char b,c;
double d;
printf("Program Konversi Suhu");
printf("\nMasukkan nilai suhu : ");
scanf("%d",&a);
fflush(stdin);
printf("\ndari[C/F/R/K] : ");
scanf("%c",&b);
fflush(stdin);
printf("\nke [C/F/R/K] : ");
scanf("%c",&c);

if(b=='C')
{
if(c=='C')
d=a;
else if(c=='F')
d=(a*1.8)+32;
else if(c=='K')
d=a+273;
else
d=a*0.8;
}
else if(b=='F')
{
if(c=='F')
d=a;
else if(c=='C')
d=(a-32)/1.8;
else if(c=='K')
d=((a-32)/1.8)+273;
else
d=(a-32)/2.25;
}
else if(b=='K')
{
if(c=='K')
d=a;
else if(c=='F')
d=((a-273)*1.8)+32;
else if(c=='C')
d=a-273;
else
d=(a-273)*0.8;
}
else
{ if(c=='R')
d=a;
else if(c=='F')
d=(a*2.25)+32;
else if(c=='C')
d=a*1.25;
else
d=(a*1.25)+273;
}
fflush(stdin);
printf("\nHasil : %d %c sama dengan %.1f %c\n",a,b,d,c);
}

Menghitung Barang

2009-11-03T03:00:00.000-08:00

Algoritma:
1. Inisialisasi int = 1,2,3,total,harga
2. input barang
3. total=1+2+3
4. total==1.500.000?
a.ya,harga=total*0,10
b.tidak,cetak total
5. cetak harga

Coding:
/*Mokh.Afrizal 7409030053*/
#include
main()
{
int total;
printf("Masukkan total=");
scanf("%d",&total);
if(total>=1500000)
printf("Total belanja anda=%d\n",total-total*10/100);
else
printf("Total belanja anda=%d\n",total);
}

Menghitung Bilangan Genap

2009-11-02T20:41:00.000-08:00

Algoritma:
1 int i = 0, x = 0,n

2 Tanya banyak jumlah data masukan ke variabel n

3 Proses looping
a. Untuk i =1 sampai n
b. Jumlahkan x dengan x = x+2
c. Hitung y dengan y =x / 4

4 Tanya apakah modulus y sama dengan 0

5 Bila ”yes” maka kembali ke proses b.

6) Bila ”no” maka cetak x

Menghitung Tahun Kabisat

2009-11-02T20:24:00.000-08:00

Algoritma:
1. int tahun

2. Input tahun

3. tahun % 4 == 0

4. tahun % 4 == 0?

5. Jika ya, maka tampilkan pesan “Tahun tahun kabisat”

6. Jika tidak, maka tampilkan pesan “Tahun bukan tahun kabisat”

Coding:
/*Mokh.Afrizal 7409030053*/
#include
main()

{

int tahun;

printf("masukan tahun");
scanf(" %d",&tahun);

if(tahun%4==0)
printf("tahun kabisat");
else
printf("bukan kabisat");
}

Menghitung Diskriminan

2009-11-02T20:10:00.000-08:00

Algoritma:
1. Masukkan nilai a, b, dan c

2. Menghitung determinan dengan rumus D = b * b – 4 * a * c

3. Jika hasil hasil yang didapat sama dengan nol (D = 0), maka terdapat dua akar real yang kembar kemudian hitung akar-akar tersebut dengan rumus

X1 = x2 = -b / 2a

4. Jika hasil yang didapat lebih besar dari nol (D > 0), maka terdapat dua akar real yang berlainan kemudian hitung akar-akar tersebut dengan rumus

X1 = (-b + sqrt (D)) / 2a

X2 = (-b – sqrt (D)) / 2a

5. Jika hasil yang didapat lebih kecil dari nol (D <>

X1 = -b / 2a + (sqrt (-D) / 2a) i

X2 = -b / 2a – (sqrt (-D) / 2a) i

6. Kemudian cetak hasil determinan dan akar-akar tersebut (x1 dan x2)

Coding:
/*Mokhm.Afrizal 7409030053*/
#include
#include
main()
{
float a,b,c;
double x1,x2,x3,x4,x5,D;
printf("Masukkan a=");
scanf("%f",&a);
printf("Masukkan b=");
scanf("%f",&b);
printf("Masukkan c=");
scanf("%f",&c);
D=b*b-4*c;
x1=-b/2*a;
x2=(-b + sqrt(D)) / 2*a;
x3=(-b - sqrt(D)) / 2*a;
x4=-b / 2*a + (sqrt(-D) / 2*a);
x5=-b / 2*a - (sqrt(-D) / 2*a);
if(D==0)
printf("maka terdapat 2 akar real yang kembar, yaitu %f dan %f\n",x1,x1);
else if(D>0)
printf("maka terdapat 2 akar real yang berlainan, yaitu %f dan %f\n",x2,x3);
else
printf("maka terdapat 2 akar imaginair yang berlainan, yaitu %f dan %f\n",x4,x5);
}

Menghitung Bilangan Ganjil

2009-11-01T07:34:00.000-08:00

- Algoritma

1. int x = 11

2. Hitung bilangan ganjil dari 10 hingga 30 dengan menggunakan rumus

for (x = 11; x <= 30; x += 2)

3. Apakah bilangan ganjil tersebut terdapat angka 21 dan 27?

4. Jika ya, maka continue kemudian cetak bilangan selanjutnya

5. Jika tidak, cetak langsung hasilnya

Coding:
/*M.Afrizal 7409030053*/
#include
main()
{
int x;
for (x = 11; x <= 30; x += 2)
if(x%2==0) printf("%d adalah bilangan genap\n",x);
else if (x%21==0)
continue;
else if (x%27==0)
continue;
else printf("%d adalah bilangan ganjil\n",x);
}

Menghitung Luas dan Keliling Lingkaran

2009-11-01T07:26:00.000-08:00

Algoritma :

1.Inisialisasi double phi=3.14,luas,kel
int rad
2. input bilangan dalam rad
3. hitung : luas = phi*rad*rad
Kel = 2*phi*rad
4. cetak hasil luas dan kel

Coding:
/*M.Afrizal 7409030053*/
#include
main()

{

double luas,kel;
int rad;

printf("masukan rad =");
scanf("%d",&rad);

luas=3.14*rad*rad;

kel=2*3.14*rad;

printf("luas dan kel =%g\n",luas);
printf("keliling lingkaran = %g",kel);
}

Tugas Algoritma dan Flowchart Transaksi Sederhana pada Bank

2009-09-27T07:37:00.000-07:00

Algoritma:
1.identifikasikan saldo=simpanan awal
2.isi form bank anda
3.proses memilih deposit atau withdraw
4.jika deposit,maka jumlah saldo = simpanan awal+amount
5.jika withdraw,cek apakah deposit > withdaw
6.jika langkah 5 bernilai benar maka withdrawing
7.jika bernilai salah maka ERROR atau GAGAL
8.cetak hasil

Latihan 3 Algoritma

2009-09-03T05:52:00.000-07:00

Algoritma Mengurutkan 3 bilangan Acak Dari Nilai Terkecil ke Terbesar

1.Masukkan bilangan 1,bilangan 2,dan bilangan 3

2.Kurangkan bilangan 1 dengan bilangan 2

3.Jika hasilnya positif maka bilangan 1 > bilangan 2 , jika hasilnya negatif maka bilangan 1 < bilangan 2

4.Kurangkan bilangan 1 dengan bilangan 3

5.Jika hasilnya positif maka bilangan 1 > bilangan 3 , jika hasilnya negatif maka bilangan 1 < bilangan 3

6.Kurangkan bilangan 2 dengan bilangan 3

7.Jika hasilnya positif maka bilangan 2> bilangan3 ,jika hasilnya negatif maka bilangan 2< bilangan 3

8.Urutkan 3 bilangan tersebut dari nilai terkecil ke terbesar

Latihan 2 Algoritma

2009-09-03T05:48:00.000-07:00

Algoritma aktivitas dari pagi hingga malam hari

1.Bangun tidur
2.Sholat Subuh
3.Mandi pagi
4.Berangkat kuliah
5.Sholat Dzuhur
6.Pulang kuliah
7.Sholat Ashar
8.Mandi Sore
9.Sholat Maghrib
10.Makan malam
11.Sholat Isya'
12.Belajar
13.Tidur

Latihan 1 Algoritma

2009-09-03T05:33:00.000-07:00

Algoritma Proses Pembuatan Kopi yang Manisnya Tepat

1.Siapkan kopi,gula,gelas,sendok,air
2.Panaskan air yang akan digunakan untuk menyeduh kopi
3.Baca petunjuk di balik kemasan kopi agar dihasilkan kopi dengan rasa manis yang tepat
4.Tuang kopi ke dalam gelas sesuai petunjuk
5.Tambahkan gula sesuai petunjuk
6.Tuang air yang telah dipanaskan ke dalam gelas yang berisi gula dan kopi
7.Aduk dengan sendok hingga kopi dan gula tercampur sempurna
8.Tes rasa manis kopi agar mendapatkan hasil yang tepat
9.Apabila kurang tepat,tambahkan kopi atau gula agar hasilnya tepat
10.Kopi dengan rasa manis yang tepat siap dihidangkan

Kawan...

2009-08-31T06:59:00.000-07:00

Ingatkah kawan
Dahulu kita menjadi sahabat
Hanya dengan sebuah tautan jemari
Tak perlu ego diri
Tak butuh lingkaran materi

Coba renungkan kawan
Saat duka larut bersama tawa
Ketika kita berkejaran di atas tanah tercinta
Di bumi terindah
ya....begitu indah

Rasakan kembali kawan
Kita pernah terluka dalam mimpi menjerat dunia
Namun kita tetap berdiri
Dan tak berhenti tuk yakini
Semua pasti nyata
Semua akan nyata

Kini kunanti kau kawan
Tuk satukan hati yang tercerai
Memastikan dunia tak kan terbelah
Bersama kita ratakan jurang tak berguna
Dan mari buka fokus dunia
Bahwa kita ada
Bahwa kita sama
Dalam cinta dan kasih Nya

Sebuah Sajak Untuk Bunda

2009-08-31T06:54:00.000-07:00

Bunda..
sebuah sajak biru ku tulis kan untukmu
Membaur dengan linang tangis bukan pilu
Nyatakan sebuah rasa tulus tiada tepi
Bunda...
Kau relakan sepenggal nafasmu demi hidupku
Kau sisihkan tangismu untuk tawaku
Dan tak ragu kau jatuhkan peluhmu
Tuk wujudkan bahagia ku
Bunda...
harapku terlelap dalam pangkuanmu
saat kuterjerembab dalam puing kepedihan
Karena di sisimu...kurasa pendar kehangatan
Yang kuyakin tak lekang oleh zaman
Bunda...
Pinta maaf ku tuk setiap butir air mata sucimu
Karena lalaiku
Karena ego liarku
Dalam simpuhku di mana surga bersemayam
Bunda...
Kuyakini kau adalah malaikat Nya
Tuk temaniku yang tersesat dalam sepi
Menjagaku dari kerapuhanku
Dalam cintamu yang tiada henti
Membimbingku menuju cahaya cinta Nya

(Tribute to My Lovely Mother)

Sebuah Kisah Sunyi

2009-08-15T03:28:00.000-07:00

Sebuah kisah sunyi...
Sang penyair mimpi
Bersatu lah ia dengan malam pekat
Tak berkawan tak berkawan
Hanya satu hati yang ia tau
Hanya satu nafas yang ia harap
Sebuah kisah sunyi...
Dari yang terhempas
Berjuang tuk sekedar ada
Dalam lingkaran tanpa ujung
Harapkan kan temui sebuah titik
Yang kan berikan segalanya sebuah arti
Sebuah kisah sunyi...
Dari sang pencari kata
Mencoba lukiskan segala rasa
Tuk artikan indah dunia
Mencari sebuah kata yang sukar terjawab
Coba pahami makna di balik sebuah kata
Kata yang mengisyaratkan tautan dua dunia
Dalam sepotong mimpi
Dalam sekeping harap

My Song

2009-08-11T03:27:00.001-07:00

Adrian Martadinata - Ajari Aku.mp3

get more free mp3 & video codes at www.musik-live.net

Saat Tanpamu...

2009-08-11T03:17:00.000-07:00

Ku lukiskan sebuah senyuman
Dalam keremangan senja
Dalam payungan redup sang mentari
Bersama alunan sebuah simfoni
Terasa damai...
Namun tetap harus kurasakan..
Dalam nya arti sebuah kehilangan
Ku coba menyatu bersama mentari
Yang terjatuh dalam pelukan malam
Walau terasa dingin menyentuh sanubari
Ku coba tuk bertahan di tepian hati
Merangkak perlahan
Tertatih-tatih tuk lewati hari
Mencoba tuk tetap terjaga
Karena ku tak sanggup tuk bermimpi
Mimpi yang sama
Dan bayangmu selalu ada
Entah mungkin tuk s'lamanya
Mengapa.....
Mengapa....
Tetap ku terjaga..
Dalam realita yang menyakitkan
Mencoba tuk ada
Walau tak pernah ada...
Di dalam duniamu
Dalam sekeping hatimu

Untukmu Sang Legenda

2009-08-11T03:09:00.000-07:00

Untukmu sang Legenda
Kusimpan segenggam tawa
Nyaring dalam hening
Ha Ha Ha Ha
Harus terurai oleh kehendak-Nya
Hiks Hiks Hiks
Menggema di setiap sudut bumi pertiwi
Jiwa-jiwa yang meresapi
Tiap cipta karya mu
Hiks Hiks Hiks
Harus terwujud walau kau tak inginkan
Karena terlalu banyak hati yang teralara
Untuk sebuah kepastian mutlak
Saat kau harus terlelap
Dalam mimpi indah penuh canda
Ha Ha Ha Ha
Ya...aku mengerti
Harusnya kita tetap tertawa
Dalam kepedihan
Dalam luka lara
Karena di mata mu
Terlalu indah dunia Ciptaan Nya
Terlalu indah..
Tuk sekedar berwarna kelabu
Ha Ha Ha Ha
Kan kami kenang dalam setiap tawa kami
Untukmu...Sang Legenda

(Tribute to The Indonesian Legend,Mbah Surip)

Hampa

2009-08-03T04:46:00.000-07:00

Mengapa ku tersadar dalam senyap
Setelah asa yang indah nun jauh di sana
Bersandar dalam keremangan
Bermain hati dengan kesunyian
Tak cukup ku merasa
Bahwa semua rasa telah sempurna
Namun tangan bisu kehidupan
Berkata agar semua nya harus terlupa
Ku bangkitkan raga ini
Namun jiwa dan cinta
Tetap tenang dalam lelap
Mencoba ku tuk berlari
Mengejar bayang-bayang yang kurasa indah
Terjatuh tanpa sebuah luka
Menangis tuk sebuah kehampaan
Ku jalani dan harus ku jalani
Dan tak pernah ku tau
Ujung lorong sempit menyesakkan
Entah tawa ataukah lara
Entah saat ini
Entah di penghujung hari

Saat Ku Merindumu....

2009-07-27T23:48:00.000-07:00

Terdiam aku dlm rengkuhan senja
Menikmati kesunyian yang meraja
Kubiarkan memoriku
Menari dalam gelap nan kelam
Mengukirkan sepenggal kisah kita berdua
Perlahan hatiku merintih
Tersesal mengapa semua t'lah usai
Dan harus kuakui
Hangat pelukmu menjauh pergi
Tinggalkan raga ini sendiri
Terjebak dalam kabut sepi
Ku coba tuk lenyapkan bayang indahmu
Namun cinta putihku tak pernah rela
Melepas indah senyummu
Yang dulu sempat warnai
Sketsa buram hidup ini
Bersama air mata yang membeku
Berhembus serpihan hatiku
Di permainkan kenangan lalu
Namun satu yang kuyakin selalu
Hati ini masih untukmu...
Harap kau sadari....
Tercipta rinduku...padamu...

Lukisan Nirwana

2009-07-27T23:40:00.000-07:00

Hamparan laut biru melayang di horison
Tambalan kapas putih nan rapuh
Menghiasinya tertatih-tatih
Semerbak udara menari riang
Merenggut sisa-sisa gelap sang malam
Perlahan panah emas menyeruak
Jadikan tambalan putih membias
Lalu lenyap....
Cengkramannya yang tajam
Menusuk mata yang memerah
Menggantungkan keindahan
Binasakan kerapuhan yang ada
Kuambil keindahan itu
Karya Sang Maha Indah
Tak mampu logika ku berujar
Biarlah hati yang goreskan tinta kenangan
Biar abadi dalam pigura bayang-bayang
Membekas jelas...dalam jiwaku..sanubariku...

In The Rainy Night

2009-07-16T04:37:00.000-07:00

I'm standing here
In the rainy night
Feel my wing hurt
Feel my pain which so much worse

I close my eyes
In the rainy night
Hear a symphony from the sorrow
All mysery just come
And stab my weak heart

Standing outside your window
In the rainy night
Just want to see
Your beautiful smile although not mine

Run....and....run
In the rainy night
I don't know why
I wish inside my heart that i would be burn
Coz i can't beat my frozen heart

In the rainy night......

The Long And The Winding Road

2009-07-16T04:33:00.000-07:00

Just Like Walk
In The Long and The Winding Road
Feel The Wings of Angel
Which Blow Wind of Pain
Make all Tears go away
And all Hope in The Universe
Broke Down
Walk In The Long and The Winding Road
Beaten by The Quite in The Corner
Killed with Sad in every Walk
Through Alone
In The Long and The Winding Road
There was no Warm
Just Cold from sorrow
Which is Blowing
In every air that you Take
In the border of
The Long and The Winding Road
Spend all The Time Alone
There's no Body
Just me and my best Friend
Called...
Quite

(inspired by The Beatles)

Kesaksian Sebutir Peluru

2009-07-06T02:52:00.000-07:00

Seandainya saja
Diriku ini memiliki nurani
Tak kan ku renggut
Tawa bahagia dari wajah-wajah itu
Tak kan kurebut
Jiwa tak berdosa
Yang terdiam dalam damainya
Pangkuan sang bunda
Serta menggoreskan tangis
Di gurat wajah mereka
Seandainya saja
Diriku diperbolehkan berpikir
Tak kan kuturuti
Nafsu manusia yang lalai
Yang memerintahku
Tak kupedulikan
Perintah-perintah biadab itu
Seandainya saja ya Allah
Engkau menghendaki
Diri ini tuk bersaksi
Akan kutunjukkan pada Mu
Siapa yang beringas
Siapa yang tertindas
Kan kutunjukkan
Jiwa-jiwa yang terpuji
Dalam rengkuhan perbuatan keji
Seandainya saja
Diri ini sanggup berkata
Kan kulafalkan syahadar
Bagi raga-raga itu
Yang berseru takbir perjuanga tiada henti
Dan kini terpuruk
Karena ku dan kaumku
Akan kulanjutkan dzikir mereka
Yang harus terputus
Seandainya saja....

(tribute to Gaza,Palestine)

Sketsa Buram

2009-07-05T00:27:00.001-07:00

Ku saksikan sketsa yang memburam
Di mana kita pernah bersama
Di mana tangis dan tawa kita
Warnai tiap guratan garis
Di mana sepotong kisah kita
Terukir dan tetap membekas
Ku pandangi sketsa buram
Yang menyapaku dalam rintih nya
Tak ku pungkiri
Hati ku tercabik perih
Tangis ini pecah dalam sunyi
Terlalu dalam kenangan ini
Tenggelamkan puing-puing rasa
Dan cinta yang tersesat
Terjatuh....
Terjerembab....
Genggam tanganku bergetar
Sketsa buram hadir dengan pesonanya
Ingin ku bersemayam di sana
Tuk s'lamanya
Karena hatiku tak kan rela
Melepas semua tuk berlalu
Namun tamparan waktu
Sadarkan diri ini
Dan jadikan sketsa buram
Terbakar membara
Biarlah hilang....
Abadi dalam kenangan....

Sepetak Surga

2009-07-04T23:38:00.000-07:00

Berjalan ku dalam dunia tanpa arah
Berjejer bunga-bunga indah
Sangat indah...
Coba ku wujudkan dalam genggam
Namun hati ini meradang dan berdarah
Ku terpana...
Keindahan itu mencengkeram udara membara
Dan sosok-sosok rapuh...
Hanyut dalam buainya....semu
Dusta dan kemunafikan
Bermesraan di lorong-lorong
Serasa terbakar mata ini
Ku tapakkan langkahku
Dan kutemui sepetak surga
Dalam keremangan senja
Di antara duri dunia
Jiwa yang teduh dalam senyum
Menuntunku bersemayam
Berlabuh dalam damai-Nya
Menjelma rasa dihati ku
Dalam sebaris dzikir yang mengalun perlahan
Dan ku tinggalkan hatiku...
Dalam sepetak surga itu...

Serenada Indah

2009-06-30T23:00:00.000-07:00

Ku tapaki langkah beku berliku
Menjauhi semerbak temaram
Hati menatap kosong terpaku
Menyaksikan kanvas putih
Kini berwarna cerah
Dalam temaram senja
Sang surya menggelitik mata perlahan
Mencampakkan kepenatan semu
Beri secercah cahaya merah yang lembut
Ku menatap sepetak rasa indah
Terpesona ku menyaksikannya
Logika ku terbelah lenyap
Meninggalkan ku dalam pencarian
Walau kurasa tak nyata
Tapi hati mengangguk
Meyakini...
Indah kan menanti di sana
Kan ku kejar...
Kan ku gapai...

Langkah-langkah Gontai

2009-06-29T03:48:00.000-07:00

Tatapanku nanar
Fokus di mata sembabku
Menari-nari bergelombang
Menciptakan bayang-bayang buram
Buatku buta karenanya
Langkah rapuhku mengalir
Membakar jalan yang menghitam
Darah mengucur deras
Dari telapak kaki yang telanjang
Tapi kepongahan hati ini
Hapus semua lara
Jejak-jeka kakiku
Terantuk kerikil tajam
Tak terasa...tak kukira
Namun jalur hidupku
Melebar....Menjauh...
Dari urat takdir
Karya Sang pencipta
Tangisan hatiku t'lah kuabaikan
Lama....Terlampau lama...
Kini tangisan itu membuncah
Dalam alunan tasbih
Yang penuh kelembutan
Tanda sesal umat kepada Pencipta
Tak kan terhenti....
Walau harus tersendat...
Dalam langkahku yang gontai

Doaku Untukmu

2009-06-29T03:37:00.000-07:00

Doaku untukmu
Wahai negeri yang terbelenggu
Terlalu lama engkau terpaku dan membisu
Wajahmu tergores tercabik perih
Namun engkau hanya berpaling
Meratap dalam sunyi
Doaku untukmu
Wahai wajah-wajah kosong
Tangisanmu t'lah membeku
Terkubur dalam-dalam
Meski kuyakin hatimu tak kan rela
Terinjak-injak derap langkah kuda perang baja
Dan teriakan batinmu
Bergaung dalam sepi
Doaku untukmu
Wahai mata yang tertutup
Apakah cahaya-Nya
Tak sanggup remukkan keangkuhanmu
Apakah tak kaulihat
Udara membara di sekitarmu
Dan gengan darah membekas jelas
Di tiap-tiap langkahmu
Kau tak kan pernah tau
Karena nafsu membutakan nuranimu
Doaku untukmu
Wahai para Penyeru Takbir
Tegapkan langkahmu
Dalam Rahmatan lil'alamin
Kumandangkan Asmaul Husna
Di lorong-lorong sunyi
Agar bergetar dunia
Oleh keAgungan-Nya
Terus melangkah dalam Cinta-Nya
Walau tanah merah menjelang
Niscaya....
Ridho-Nya kan turut serta

(tribute for Gaza,Palestine)

Tangan-tangan Rapuh

2009-06-29T03:29:00.000-07:00

Tangan-tangan halus lagi rapuh
Bertepuk sekeras-kerasnya
Sangat keras
Mungkin kan hancur
Tapi tak kan hentikan tangan itu
Entah kapan bermula
Entah untuk apa bermula
Tangan-tangan itu
Kini menari-nari
Mengikuti irama musik telanjang
Hanyut bersama tangan-tangan yang lebih besar
Entah tau untuk apa
Dan untuk apa harus tau
Biarlah jadi sebuah tanya
Tangan-tangan rapuh kini merengek-rengek
Menggapai bendera berwarna-warni
Pikirnya indah
Pikirnya cerah
Entah tau untuk apa
Dan buat apa perlu tau
Yang penting harus dapat
Yang perlu harus semarak
Hanya beberapa saat
Tangan-tangan rapuh kini meronta panik
Tangan-tangan besar
Menghajarnya membabi buta
Entah sengaja...tiada yang kan peduli
Dan tangan-tangan rapuh
Kini mengucurkan darah
Terkulai lemas
Terenggut nyawanya

Opera Muka Bumi

2009-06-29T03:19:00.000-07:00

Tatapan sinis matahari
Membakar tengkuk jalanan
Memerah...lalu terbakar
Perlahan aspal jalanan pun meleleh
Detelan oleh perut bumi
Pohon-pohon botak
Bersuit-suit senang
Hanya sejenak
Hanya sekejap
Lalu terdengar teriak keji
Dari pucuk-pucuk daun
yang kini melebur jadi abu
Dan kini udara mengejek
Dengan wajah cemong
Penuh jelaga bau
Hanya sejenak lagi
Hanya sekejap lagi
Karena udara menjerit
Tercekik..lalu pudar
Hanya jelaga bau
Yang tersisa menggantinya
Kini saat manusia tertawa
Bangga dan pongah
Lagi-lagi hanya sejenak
Lagi-lagi hanya sekejap
Karena mereka leleh layaknya aspal
Mereka jadi abu bagai dedaunan
Dan mereka tercekik tak beda oleh udara
Lalu tangis kosong
Mengucur dari hati mereka
Terlambat....Sangat terlambat....
Karena tirai panggung
Telah diturunkan

Melodi Angin

2009-06-29T03:14:00.000-07:00

Sayup terdengar dalam hening
Sebentuk alunan melodi
Terasa merdu
Teramat syahdu
Dan waktu membisu karenanya
Daun-daun rapuh
Berdansa bergantian
Menyemarakkan suasana
Terlupa segala pucuk-pucuk lara
Alunan melodi
Menggema dalam sunyi
Menggenggam erat jutaan misteri
Membangkitkan rangkaian rasa
Yang ku tau pasti t'lah mati
Melodi apa ini?
Mampu menyayat hati
Mampu mebelah sepi
Kurelakan mataku terpejam
Tuk nikmati nada demi nada
Dan tak henti nafas ini berujar
Indah melodi ciptaNya

Hati Yang Membeku

2009-06-29T03:08:00.000-07:00

Ku terdiam
Di bawah tirai malam
Menyaksikan sinar rembulan
Yang kini kian pias
Lelah tuk hangatkan dunia
Perlahan kujerat udara
Mencoba isikan sejenak
Penyejuk hati
Namun kurasa hati ini terlalu dingin
Terlampau dingin
Hingga akhirnya membeku
Ku berlari
Membelah petak-petak gelap
Di pelupuk mata
Raga ini membara dan terbakar
Namun hatiku
Tetap utuh dalam beku
Ku terjatuh
Merasa kepedihan yang sama
Air mata yang sama
Rasa sakit yang sama
Ku berteriak dalam senyap
Dan hatiku....
Masih membeku

Sobat

2009-06-26T21:03:00.000-07:00

Hei sobat
Berjalan kita di depan keangkuhan
Bersatu kita dalam rasa tanpa arah
Ego adalah harta kita
Genggam erat tanganku
Dan kita raih mimpi yang berpijar
Satu-satu nafas kita meregang
Tapi jangan kau lepas genggaman ini
Karena kita satu dalam harap
Hei sobat
Jalan kita terlalu terjal
Memerah dan membara kita laluinya
Langkah berdarah tak kan hentikan kita
Maju dan tiada pernah gentar
Hingga esok kan tersenyum
Menyambut kita
Hei sobat
Mungkin waktu kan hancurkan kita
Dan raga kita harus mencair
Melebur dalam sungai tak bermuara
Namun percayalah sobat
Hatimu dan hatiku...
Tetap kan satu dan utuh

JoKer...The Begining

2009-06-21T20:17:00.000-07:00

Don't judge the book just from the cover
Mungkin itu yang akan anda temui dari blog ini. Blog ini sengaja saya tetaskan untuk menyalurkan kesenangan saya dalam menggambarkan keindahan dalam kata". Mungkin akan ada yang berkata,"soK puitis","Sok romantis",ataupun "sok Sepatu", tapi saya akan menganggap semuanya adalah pujian yang teramat indah. Jadi,temukan arti sebuah kata dan pahami...betapa indahnya...