Archive for April 8th, 2008

Konversi basis bilangan menggunakan rekursif

#include <stdio.h>
char ch[17] = “0123456789ABCDEF”;
void CetakBaseN(int base,int nilai)
{
if (nilai == 0) //jika nilai sudah 0 maka keluar
return;
CetakBaseN(base,nilai / base);
printf(“%c”,ch[nilai % base]);
}
void main(void)
{
CetakBaseN(2,255); printf(“\n”);
CetakBaseN(8,255); printf(“\n”);
CetakBaseN(10,255); printf(“\n”);
CetakBaseN(16,255); printf(“\n”);
}

Add comment April 8, 2008

Ku Kenal Dirimu

Puisi dibawah ini ayu dapat dari situs http://www.anggrekbiru.com yang ditulis oleh mas Kenzt , Kebetulan puisi ini belum ada judul jadi ayu posting aja di blog ini, Ayu beri judul Dirimu karena menurut ayu puisi nya lebih pada sesorang yang telah dikenalinya. Hehe…Ayu hanya kasih judul, kalau ada teman2 yang ingin beri judul lebih bagus dari ini silahkan..!

Dirimu

Jika aku dapat mengenalmu dari dulu
Pasti kan kuucap syukur sejak waktu itu
Jika aku dapat mengenalmu lebih jauh
Kan kuberikan s’luruh perhatian untukmu

Mungkin di dunia ini kau bukan yang terindah
Tapi tetap tak dapat kucegah hatiku mengatakan sebaliknya
Mungkin aku tak dapat mencintaimu sempurna
Tapi jika kau mencari cinta, aku bisa mencintaimu s’lamanya

1 comment April 8, 2008

Contoh – contoh Program TURBO C

/* Contoh Program Menghitung Luas Lingkaran */

# include < stdio.h >

main()

{

float l,r;

clrscr();

Printf ( ” Menghitung Luas Lingkaran \n “);

Printf ( ” =========================\n “);

Printf ( ” Masukkan Nilai Jari – Jari : “);

scanf ( “%f”,&r);

l=3.14*r*r;

printf (” Luas Lingkaran = % 6.2%f”,l);

getch();

}

/* Contoh Program Menghitung Luas Segitiga */

# include < stdio.h >

main()

{

float L,a,t;

clrscr();

Printf ( ” Menghitung Luas Segitiga \n “);

Printf ( ” =========================\n “);

Printf ( ” Masukkan Nilai alas : “); scanf ( “%f”,&a);

Printf ( ” Masukkan Nilai tinggi : “); scanf ( “%f”,&t);

L = 0.5*a*t;

printf (” Luas Segitiga = % 6.2%f”,L);

getch();

}

/* Contoh Program Menggunakan Fungsi */

# include < stdio.h>

# include <conio.h >

main ()

{

hpslyr();

cw ( ” contoh Program Fungsi “, GREEN);

cw ( ” Press Any Key to Exit “, GREEN + BLINK);

getch();

}

hpslyr()

{

clrscr();

}

cw(teks,warna)

{

printf(“\n”);

textcolor(warna);

cprintf(text);

}

/* Menghitung Luas Lingkaran */

# include < stdio.h>

#include <conio.h>

main()

{

float luaslink,j ;

wlyr (BLUE)

cw (“Menghitung Luas Lingkaran “);

cw (“Masukkan nilai r : “,YELLOW );

scanf(” % f “,& j);

luaslink=luaslink(j);

cprintf ( ” Luas lingkaran = % .2f”,luaslink);

cw ( ” Press Any Key to Exit “, GREEN + BLINK);

getch();

}

wlyr(warna )

{

Textbackground(warna);

clrscr();

}

cw(teks,warna);

{

printf(“\n”);

textcolor(warna);

}luas link (r)

float r;

{

return (3.14*r*r);

}

Add comment April 8, 2008

Jelek

– Jangan putus asa , tidak semua orang menilai manusia dari fisiknya
.. DONT JUDGE THE BOOK BY THE COVER .. (Jangan menghukum buku karena
dia meninggalkan koper).

– Jangan salahkan diri anda kalau anda jelek, salahkanlah orangtua
anda, karena jelek itu keturunan .. LIKE FATHER LIKE SON (Suka
bapaknya, suka juga sama anaknya).

– Perbaiki inner beauty anda, itu kalau anda merasa sisi luar anda
udah ancur ga ketolong lagi .. THE BEAUTY IS UNDER THE SKIN (Jadi cakep
kalo udah ganti kulit)

– Jgn sakit ati kalo dikatain jelek,cuek aja, pokoknya kafilah
m’gonggong [censored] tetap berlalu .. NO GAIN WITHOUT PAIN (Ga dapet
duit kalo ngga kesakitan dulu…kaya kuda lumping).

– Jadilah diri anda anda sendiri, kalau anda jelek syukurilah
kejelekan anda .. JUST BEE YOURSELF (Kesengat tawon, itulah kamu (muka
kamu)).

– Kalau orang lain menilai anda jelek, jangan skeptis, penilaian
manusia tidak selalu benar … THE TRUTH IS OUT THERE (Yang bener boleh
keluar).

– Cakep-jelek itu tergantung lingkungan, misalnya anda disini jelek
tapi di Afrika bisa paling ganteng .. THE RIGHT MAN IN THE WRONG PLACE
(Orang disebelah kanan, salah tempat, harusnya disebelah kiri).

– Cinta tidak memandang cakep atau jelek, gak percaya? Tanyakan hal
ini sama orang jelek .. LOVE IS BLIND (Pacarilah orang buta).

Sumber : http://www.mail-archive.com/stieykpn@googlegroups.com/msg00017.html

Add comment April 8, 2008


Kategori

 

April 2008
S S R K J S M
     
 123456
78910111213
14151617181920
21222324252627
282930  

Tulisan Terakhir

Komentar Terakhir

Pengemar Mu di Ku Kenal Dirimu

Klik tertinggi

Arsip