Senin, 16 November 2009
Minggu, 03 Mei 2009
Selasa, 24 Maret 2009
Minggu, 15 Maret 2009
Rabu, 04 Maret 2009
Tugas aLgoriTma 2
Kamus
Type
Data : Record
Nama : string
Alamat : string
Tujuan : string
Kelas : string
Harga : real
Jumlah_beli : integer
Total_harga : real
Tiket : array [1..100] of Data
VAR
A : Tiket
I,j,jumlah_data : byte
Tukar : data
Procedure Input
{
With A [i] Do
{
Readln (nama,alamat,tujuan,kelas,jumlah_beli)
}
}
Procedure Proses
{
With A [i] Do
{
If (tujuan = ‘
Harga = 90.000
Else
If (tujuan = ‘
Harga = 75.000
Else
If (tujuan = ‘
Harga = 120.000
Else
If (tujuan = ‘
Harga = 90.000
Total_harga = harga * jumlah_beli
}
}
Procedure Urut
{
For I = 1 to jumlah_data -1 Do
For j = 1 to jumlah_data –I Do
{
If A [j]. Nama > A [j+1]. Nama then
Tukar = A [j]
A [j] = A [j+1]
A [j+1] = tukar
}
}
Procedure Output
{
Writeln (‘_____________________________________________’)
Writeln (‘nama alamat tujuan kelas harga jumlah_beli total_harga’)
Writeln (‘_____________________________________________’)
For I = 1 to jumlah_data Do
{
With A [i] Do
Writeln ( nama, alamat, tujuan, kelas, harga, jumlah_beli, total_harga)
}
Writeln (‘_____________________________________________’)
}
Algoritma Utama
{
Readln (jumlah_data)
For I = 1 to jumlah_data Do
{
Input
Proses
}
Urut
Output
}
Senin, 02 Maret 2009
biMbang,,g bGdz dEgh..
hri ini nia kpikiran agy ma tu c0,,,nia tau nia g pntes bgd ma dia,,,secara gitu dia rang'a ganteng,pinter,baek,'n iank pasti tajir heu",,
tapi jujur,,,nia kaya g nhan gtu klo inget dia tegh...bwaan'a pngen ktemu trus,,,pdhal spa lo spa gue he",,dia indah wt nia,,di perfect bgd degh,,,tpi lbh bnyak juga ce iank perfect wt dia heu"..
mufin nia dra,,,nia g bs b00ng...klo nia bharap bgd bs jd pcar dia ha",,,,
tp kmu hrs pcaya ma nia,,,nia sangat sayang ma kmu...mlebihi dia,,,,
nia ttep cinta ma kmu dra,,,,nia gmo ngehianatin kmu agy....
Minggu, 01 Maret 2009
Jumat, 27 Februari 2009
I'm faLLing in Luph wiTh U
Nia malu bgdz ma dri nia sndRi...knapa iiia nia bgitu bodoh'a prnah nyakitin seorang lelaki yang ternyata,,,baiiiiiiiiiiiiiiiiiik bgdz ma nia,,
dia bertahan sma nia wlopun yaaa,,,tau sendiri nia pernah selingkuh ma mantan nia sendiri,,,,tp dia begitu sabar'a....nia ngerasa nia udah kaya pecundang yang selalu btuh belaian kasih sayang'a,,,jjur nia g bs lepas dr dia,,,dia terlalu indah wt nia tinggalin...nia gmo keilangan co sebaik dia,,,,mufin nia,,,nia udah sering ngecewain kamu...nia bkalan nyoba jd ce manieees wt kamu,,,kamu mau kan mufin nia?????nia sadar sekarang cuma kamu satu2'a co iank bisa ngertiin nia apa ada'a....thank g00d engkau telah kirimkan seorang lelaki iank sangat sayang sama nia,,,alhamdulillahirabbila'lamiin....jadikanlah kami saling menyayangi karnaMu Ya Rabb,,,,biarkan kami merasakan kabahagiaan ini hingga akhir hayat kami,,,,karna kami saling membutuhkan,,,,Ya Rabb,,,,jangan kau lupakan doa kami,,,jangan kau jauhkan kami....."aku terlanjur cinta kepadamu,,,,dan tlah ku berikan seluruh hatiku,,,,,".....
Rabu, 25 Februari 2009
siaLanD,,,
Nia pNgend ngeLupaind kMu...pLizzz,,,,
Nia aGy pnGend meNikmati iDup senDiri dLu,,,puSiennk uyz mKirin pCaran tRuzzz....
b0senddd,,,,,
Nia pNgend seRius beLajar ajaH....
Senin, 23 Februari 2009
hearT_bReakers
jGn gaNgu aQuwH aGy dRa...
Nia udah cKup cKit aTi ma kMu,,,
bRkorban dQt ajaH wt aQuwH kMu gMo,,,tp wt nLpon raNk laEnd kMu bs!!!!!!!!!!
inDra,,,kMu seTan buLshieTt!!!!!
Jumat, 20 Februari 2009
Tugas Algoritma
#include#define MAX_LINE 1024
void discardnewline(char s[])
{
int i;
for(i = 0; s[i] != ”; i++)
{
if(s[i] == ‘\n’)
s[i] = ”;
}
}
int reverse(char s[])
{
char ch;
int i, j;
for(j = 0; s[j] != ”; j++)
{
}
–j;
for(i = 0; i 0)
{
discardnewline(line);
reverse(line);
printf(”%s\n”, line);
}
return 0;
}