Belajar dari kesalahan,,,

program sorting_lengkap dengan mengunakan pascal

program sorting_lengkap;
uses crt;
var
sorting:integer;

procedure insertionsort;
const
MAX = 10;
var
a : array[1..MAX] of integer;
i,n : integer; Continue reading

Advertisements

Program permutasi dengan paskal

program permutasi;
uses crt;

function factorial(u: integer): longint;
begin
if (u = 0) then
factorial := 1
else
factorial := u * factorial(u – 1);
end; Continue reading

story,,,

tadi curhat sma si jelek..

Daapat kata2 motivasi dari dia tadi,,,,

gina dia bilang “KEGAGALAN AWAL DARI SUKSES”…. dan blajarlah dari kegagalan tu,,,,, kamu harus mengalahkan lawan mu,,,, dan tidah boleh menyerah,,, walaupun kamu gagal skrang,,, tapi yang akan datang kmu yang bakalan sukses,,,,jangan pernah takut dengan kegagalaan karena tanpa kegagalan kita tidak akan pernah menjadi dewasa…dan bersahbaatlah dengan dy,karena dia yang kan membuaatmu sukses kelak,,,,
tetp berusaha n berdoa..

orang yang tidak pernah merasakan gagal,,, tidak akan merasakan sukses yang sebenarnya,,,,,,,

kata2 yang paling saya ingat dri percakapan saya sma dy,,,,… senangnya dapat motivasi dari si jelek ringu,,,,, 🙂

Hanya waktu yang mampu mengerti…..

Selamat Tinggal Cinta Pertama

Ku tulis ini saat tersedih
Menunggu dirimu yang tak bersalah
Terpisah karna keadaan
Selamat tinggal cinta pertama
Mengisi waktuku memberi rasa
Tak terlupakan

*
Tak mudah ungkapkan dengan hati
Saat senyum dan tangis menyatu
Tapi terbaik untukku dan untuk dirimu

**
Hanya waktu yang mampu mengerti
Betapa berat perpisahan ini
Semoga cerita cinta ini
Menjadi kenangan indah nanti

Pelukan ini untuk dirimu
Adalah pelukan dari hatiku terakhir kali

Back to *, **

lagu ingatin aku sma si jelek,,,

lagu pertama yang aku nyanyi’in buat dy,,,, hehehe

pengen nyanyi bareng si jelek lagi,,, 😛 😛

………….

Gagal bukan berarti harus berhenti, karena pasti Tuhan tlah memberikan jalan yg lebihbaik untukmu 🙂

cara menghitung nilai diagonal ruang dengan mengunakan pascal


program diagonalruang;
uses crt;
var a:integer;
Begin
clrscr;
writeln(‘ program menhitung nilai diagonal ruang’);
writeln;
writeln;
writeln(‘                 _____________     ‘);
writeln(‘                /:           /:    ‘);
writeln(‘               /_:__________/_:    ‘);
writeln(‘              :  :                               : :    ‘);
writeln(‘              :  :                               : :    ‘);
writeln(‘              :  :                               : :    ‘);
writeln(‘              :  :                               : :    ‘);
writeln(‘              :  :__________:_:    ‘);
writeln(‘              :_/___________:_/    ‘); Continue reading

sayang ku

sayang ku,,

masih kah kau mengingatku?

masihkah kau merindukanku?

masihkah sayang itu selalu untukku?

sayang ku,,,

ku tak bisa melupakanmu

ku tak bisa jau dari mu

ku tak bisa lepas dari bayanganmu

sayang ku,,,

aku merindukanmu

aku mengharapkanmu

sayang ku,,,

aku ingin merasakan kembali kelembutan seperti dulu lagi

kasih sayang yang selalu kamu beri

sayang ku,,

rasakan sayang ku ini

rasakan rindu ini

rasakan bisikan lembut hati ku,,,