jawaban No 4

 # include <iostream.h>
 # include <stdio.h>
 # include <math.h>
 # include <conio.h>
 # include <string.h>

 struct data {
    char kode[15];
    char nama[30];
    char pendidikan[15];
    char keahlian[30];

    } pgw[50];

 void menu();
 void isi();
 void tambah();
 void baca();

 void main()
 {
    char pil='0';
    while (pil!='4')
    {
    menu();
    pil=getche();
    switch(pil)
    {
        case'1':
            isi();break;
        case'2':
            tambah();break;
        case'3':
            baca();break;
        case'4':
            break;
    }
  }
 }

 void menu()
 {
    clrscr();
    gotoxy(25,5);cout<<"MENU DATA BUDIDARMA";
    gotoxy(25,6);cout<<"-------------------------------------";
    gotoxy(25,7);cout<<"[1]Input data dosen";
    gotoxy(25,8);cout<<"[2]Input data mahasiswa";
    gotoxy(25,9);cout<<"[3]Membaca Data dosen";
    gotoxy(25,10);cout<<"[4]Membaca data mahasiswa";
    gotoxy(25,11);cout<<"[5]Keluar program";
    gotoxy(25,12);cout<<"------------------------------------";
    gotoxy(25,13);cout<<"PILIHAN :";
 }

 void isi()
 {
    FILE *coba;
    char gj[10];
    float atof();
    int i,n=0;
    while(1)
    {
      clrscr();
      gotoxy(35,5);cout<<"MEMASUKKAN DATA DOSEN";
      gotoxy(35,6);cout<<"------------------------------------------";
      gotoxy(35,7);cout<<"Kode Dosen   :";
        gets(pgw[n].kode);
      if(strlen(pgw[n].kode)==0)
        break;
      gotoxy(35,8);cout<<"Nama  :";
        gets(pgw[n].nama);
      gotoxy(35,9);cout<<"Pendidikan  :";
        cin>>pgw[n].pendidikan;
      gotoxy(35,10);cout<<"keahlian    :";
        cin>>pgw[n].keahlian;
      gotoxy(35,6);cout<<"--------------------------------------------";
      n++;
    }
    coba=fopen("c:\\Pegawai.Dat","wb");

    for(i=0;i<n;++i)
    {
      fwrite(&pgw[i],sizeof(pgw[i]),1,coba);
    }
    fclose(coba);
 }

 void tambah()
 {
    FILE *coba;
    char gj[10];

    float atof();
    int i,n=0;
    while(1)
    {
      clrscr();
      gotoxy(35,5);cout<<"MENAMBAH DATA Dosen";
      gotoxy(35,6);cout<<"------------------------------------";
      gotoxy(35,7);cout<<"Kode dosen   :";
        gets(pgw[n].kode);
      if(strlen(pgw[n].kode)==0)
        break;
      gotoxy(35,8);cout<<"Nama  :";
        gets(pgw[n].nama);
      gotoxy(35,9);cout<<"Pendidikan  :";
        cin>>pgw[n].pendidikan;
      gotoxy(35,10);cout<<"Keahlian    :";
        cin>>pgw[n].keahlian;
      gotoxy(35,6);cout<<"---------------------------------------";
      n++;
    }
    coba=fopen("c:\\Pegawai.Dat","ab");

    for(i=0;i<n;++i)
    {
      fwrite(&pgw[i],sizeof(pgw[i]),1,coba);
    }
    fclose(coba);
 }

 void baca()
 {
    FILE *coba;
    int i=0,n=0;

    clrscr();
    coba=fopen("c:\\Pegawai.Dat","rb");
    if(coba==NULL)
    {
        gotoxy(20,10);cout<<"File PEGAWAI.Dat belum ada";
        gotoxy(20,12);cout<<"Tekan sembarang Tombol";
        getch();
        return;
    }
    gotoxy(5,1);cout<<"LAPORAN DATA PEGAWAI STMIK BUDIDARMA";
    gotoxy(5,2);cout<<"----------------------------------------";
    gotoxy(5,3);cout<<"NO   KODE   NAMA  PENDIDIKAN    KEAHLIAN ";
    gotoxy(5,4);cout<<"----------------------------------------";
    while((fread(&pgw[n],sizeof(pgw[n]),1,coba))==1)
    {
        i++;
        gotoxy(6,4+i);cout<<i;
        gotoxy(10,4+i);cout<<pgw[n].kode;
        gotoxy(19,4+i);cout<<pgw[n].nama;
        gotoxy(50,4+i);cout<<pgw[n].pendidikan;
        gotoxy(60,4+i);cout<<pgw[n].keahlian;
    }
    gotoxy(5,5+i);cout<<"--------------------------------------Design HERIANTI LUSIA SIMBOLO";
    getch();
    fclose(coba);
 }

#include<iostream.h>
#include<conio.h>
#include<stdio.h>
#include<string.h>

struct pegawai
 {
    char nik[9];
    char nama[20];
    char kd[5];
    char jabatan;
 } peg[20];
void main()
{
    char lg='Y';
    int hasil,i,n=0;
    float gaji=0;
    long tunjangan;
    long tgaji=0;

while(lg=='Y'||lg=='y')
{
     clrscr();
        cout<<"Input Data Pegawai\n";
        cout<<"-----------------------------------\n";
        n++;
        cout<<"NIK    :";
            gets(peg[i].nik);
        cout<<"Nama :";
            gets(peg[i].nama);
        cout<<"kd[1,2,3] :";
             gets(peg[i].kd);
        cout<<"Input Lagi[Y/T] :";
            lg=getche();
        }

        clrscr();
        gotoxy(5,3);cout<<"LAPORAN GAJI PEGAWAI                                    \n";
        gotoxy(5,4);cout<<"----------------------------------------------------\n";
        gotoxy(5,5);cout<<"Kode    NIK    Nama    Jabatan    Gaji    Tunjangan    TGaji   \n";


        gotoxy(5,6);cout<<"--------------------------------------------------- \n";

        for(i=1;i<=n;i++)
        {
            gotoxy(6,6+i);cout<<i;
            gotoxy(9,6+i);cout<<peg[i].nik;
            gotoxy(17,6+i);cout<<peg[i].nama;
            gotoxy(35,6+i);cout<<peg[i].kd;

            hasil=strcmp(peg[i].kd,"1");
            if(hasil==0)
            jabatan="Persediaan";
            gaji=2500000;

            hasil=strcmp(peg[i].kd,"2");
            if(hasil==0)
            jabatan="Administrasi";
            gaji=2000000;

            hasil=strcmp(peg[i].kd,"3");
            if(hasil==0)
            jabatan="Keuangan";
            gaji=1500000;


            gotoxy(45,6+i);cout<<gaji;
            gotoxy(48,6+i);cout<<jabatan;

            hasil=strcmp(peg[i].kd,"1");
            if(hasil==0)
            tunjangan=0.35*gaji;

            hasil=strcmp(peg[i].kd,"2");
            if(hasil==0)
            tunjangan=0.10*gaji;

            hasil=strcmp(peg[i].kd,"3");
            if(hasil==0)
            tunjangan=0.05*gaji;

            gotoxy(45,6+i);cout<<tunjangan;


            tgaji= gaji + tunjangan;
            gotoxy(50,6+i);cout<<tgaji;
        }
            gotoxy(5,7+i);cout<<"--------------------------------------------";
            getch();
    }

SAPTU 25 JUNI 2011

SAPTU 25 JUNI 2011

 

life is unbelievable

there's no such thing that you could believe in life.

you don't believe this or that thing could happen.

life is unbelievable

because

you are always surprised by the way it works to you

because

you like saying "i don't believe it happened to me" when you are sad

because

you like saying "i don't believe it happened to me" when you are happy


life is unbelievable in every way.

everything in your life is just unbelievable.


you are unbelievable to me.

i am unbelievable to you.

we are just unbelievable.


life keep making unbelievable things.

so

live is definitely unbelievable.

Half of 2011

I've been through the first half of 2010 without even touching this blog. not because i don't have any dramatic, melancholic, ordinary, extra ordinary experiences during that time, it's just pathetically i created new blogs for myself and about myself. This new blog was meant to be my diary but it happens to be just "my ordinary" blog that i forget to have it...sighs! :D. since that blog is only about me (a bit personal) so....i don't want to publish it ...hahahaha...pathetic huh? :p
anyway, i miss this blog and would like to make a footage for this month and this year. i do miss writing here and to be more precise...i miss writing. i lost my 'mojo' of putting anything in my mind and feeling into a writing.
oh well....i'm telling you, i need to get a new job (much better for sure)or i'll be dying with bored! :))...LOL!
ah one more thing: i think i "avoid" writing in blogger because the application does not complete anymore to make some editing and layouting....i don't like it, perhaps because it's free...hahhaha...:p

what is love anyway

'can you keep a secret?'

'i don't think so, but if you trust me, i think i can just keep it for myself'

'okay...'

'ya?'

'i think i'm in love, with someone who is older than me and completely not my type'

'i don't have anything to say now'

'i'm terribled by this love but terribly in love with her'

.................................

'where were we?sorry got to do something else'

'i'm in love'

'ah ya....i have to keep for myself about your "not supposed to love" with a woman who is actually older than you and she's actually not your type while your wife is actually close enough to fill the type that you wanted that's why you decided to marry her, right?'

'hehehe....i didn't exactly say that, i just said i'm terribly in love'

'why does everybody has to tell their secret to me and give me some kind of new heavy task to keep it and hold it for the rest of mylife?'

'because you're such a good person and you know that by telling someone whom we trust about our secret then we can ease our pain ...well...although i'm sharing my pain story to you'

'oh well...glad i could help you then'

'besides, i need to talk to you not only i trust you but i need to hear that my feeling is wrong, i'm supposed to stop this feeling'

'i don't have anything to say at this moment'

'i've been having this feeling and this affair for the last 2 years, i know it's not right, and she needs more than just having this backstreet relationship and her family demands her to get married soon'

'hhmmm....if her family knows who you are they are not supposed to ask you to marry their daughter, they should know that it's not right'

'i know..we have stopped seeing each other'

'so... end of story, what's the problem then?

'i cannot just erase my feeling, and pretend that i don't have it, it is on and off, on and off.... and i want to stop it'

'love.....i think i know how it felt and its effect, i thought i had love but then i have this hatred and mad but all of those fly with the time but i can't forget it'

'yes, it's true'

'i was so naive, even in my age. frankly, i respect a marriage, for me there is no such thing of 'marriage by forced' or 'marriage because we have to'. marriage is someone's decision. we can say 'no' if we don't want to get married now or with her or him. it's our own call to decide. so, we are not supposed to blame anybody else for what we think is a mistake to married with this particular someone or if we are in difficult position with our partner'

'i know, i think i am standing before a big stone now and it's not easy for me to face it'

'life is full with stones, sometimes we face the small one sometimes we face the big one. if you think falling in love with somebody else is a big stone then you are not supposed to keeping bumping your head over and over again to get rid of the stone from your path as a result you have made the stone becomes more and more attached to you and fall in love with you. you have to be creative to find a way to move the stone from your path. sometimes, we can indirectly ask our partner to help us to move the stone, to work together to destroy the stone. it's not even the stone's fault to be there, it's already there before you cross to that path'

'yeah'

'you have to remember why you chose your partner, why you married her at the beginning, why you have such a courage to announce and declare your love not only in the name of God but in front of millions of people in the world. you should keep your holy vow and promise not only to your wife but also to God and everybody who has heard your vow. when you can keep your vow and you don't break your promise then you have proof not only to God but to yourself that you are a man!'

'speechless...., thanks for being my friend, thanks for telling me all of these stuffs, thanks for reminding me, thanks for being honest with me'

'oh well.....i said i don't have anything to say but turned out i said too much....too much for someone who is not even capable of having love ..again or not yet experiencing to say and have 'lifetime vow''

'it's proven that we don't need that, right? you have said all....all i need to hear at this moment, and we should meet up....i still need to talk'

'what is love that makes you like this?....please don't ask me anymore, i don't know....'

when love becomes stone in life,

when stone becomes air in life,

when love becomes nothing in marriage,

when marriage becomes nothing with stones

...then, what is love anyway?

love is.......

(to someone who is facing the stone, to someone who is breathing the air, and to someone who broke the words......words are nothing when it ain't said but everything when it's heard)

 

RABU 29 JUNI 2011

recently

baru saja mulai sedikit rileks, menyandarkan badan pada kursi dan menikmati secangkir kopi instan pahit yang sudah lama tidak kunikmati karena banyak penentangnya ketika sempat tepar beberapa waktu dengan badan panas dingin tak menentu....eee.....tiba-tiba mata ini 'gerah' melihat meja kerja yang berantakan dengan dokumen-dokumen yang belum terfile rapi maka acara menyandarkan diri menjadi merapikan meja dan berkas-berkas ..dan lalu tiba-tiba.....oh s**t..Oh my God...this approved letter reminds me that we missed one thing...just one thing....one activity that already been implemented but forget to propose the reimbursement on the quarterly workplan ...aaarrrggghhh.....and then tulisan ini menjadi alenia dengan satu kalimat yang teramat panjang yang tadinya ingin kumulai dengan sebuah 'kenyamanan semu' ala passed the deadline with 'flying flag' but unluckily both eyes, both brains, both body in this room has totally exhausted and missed one thing.....one thing.

oh well...my work, we have to revise it and re-send it...*sigh* ...not a perfect work i've done though!

ngomong-ngomong soal nulis 'recently', sebenarnya pingin nulis kejadian akhir-akhir ini saja, tapi karena kejadian tadi jadi hilang 'akal' dan rasa untuk melakukannya lagipula kejadian recentlynya gak spektakuler cuma macam ditawari buat ikutan kompetisi swatch collection, blum ikut ujian les karena sakit jadi dibolehkan nyusul, masih demen banget tidur, orang-orang begitu perhatian dan inget kalo saya sakit walau tidak saya ijinkan nengok, harus mulai rajin masak buat bekal lunch biar gak jajan sembarangan dan gak gampang sakit, katanya bakal dapat komisi ..alhamdulillah ....kebeneran pas lagi bokek abis-abisan trus dapat tiga kali amplop isi uang karena jadi partisipan...alhamdulillah gak bolak-balik ke ATM yang dah gak ada isinya..semoga bisa mempertahankan diri sampai akhir bulan dengan isi amplop itu, mulai bosen ma facebook tapi itu salah satu hiburan kalo pas lagi nulis TOR, bakal pulang malam dari Sing tar bulan desember karena skedul penerbangan 'dipaksa' diundur...untung kali ya ini jadi biar gak buru-buru tar, masih gak habis pikir dan bilang butuh dicuci otak tapi sebenernya gak terlalu dipikirin lagi, blum nemu lagu baru buat nyekokin otak dan masih dengerin koleksi lagu-lagu lama yang dah mulai ketinggalan jaman dan dah diapal anak-anak kalo ke inul, maksa konsultan buat mo kerja cepet tapi blum bikin kontraknya dari sekarang, sedih karena nyokap lagi mriang-mriang, flu, sakit perut di kampung, dah mulai kebiasa ma panas dan keringat di kantor ini, merasakan manfaatnya punya asuransi kesehatan jadi gak kluar ongkos buat brobat ..tapi jangan pernah diinfus lagi...srasa lemah banget, gak habis pikir juga karena ada yang nyuekin, gak habis pikir juga kenapa ada yang tiba-tiba nongol, gak nemu 'vibrate' tapi ngirim juga akhirnya, gak habis pikir kenapa blum juga ganti hape yang joysticknya dah ngadat abis...ah ini kayaknya berhubungan dengan masih rasionalnya otak gue mengingat dah bokek itu dan tetep...sok low profile, lebih pingin bli netbook ato apel ato vaio ketimbang hape tapi skali lagi gak habis pikir kenapa lebih gampang 'ngegesek' buat sepatu dan tas yang dah berjibun dan gak ada tempat di raknya lagi, masih bisa nepatin janji buat nulis soal jakarta lagi walo gak terlalu total.

oh well...gue emang aneh kadang-kadang...recently...

KAMIS 30 JUNI 2011

 

puisi untuk semua

ketika guru saya bertanya, apakah saya pernah tampil di depan umum, saya jawab "iya", "apa yang kamu perankan?" tanyanya, "saya membaca puisi", "puisi siapa yang kamu baca?", jawab saya "puisi ibu saya dan puisi saya sendiri".

saya tidak menyadari ketika kecil bahwa ibu saya memiliki cara tersendiri untuk membuat anaknya yang satu ini bisa tampil di depan umum seperti halnya kakaknya yang pandai menari, sampai akhirnya saya menampilkan puisi saya sendiri dihadapan orang-orang. saat itu saya mengerti betapa penuh pengertian dan perhatian ibu saya terhadap kami. betapa sebuah keadilan dan kasih sayang beliau tunjukkan melalui dukungannya kepada kami. masing-masing kami memiliki 'aura' yang berbeda yang ibu saya bisa lihat. tidak sekalipun beliau memaksa kami melakukan hal-hal itu, tapi sekali ibu melihat bahwa tidak hanya anak tertuanya yang bisa tampil tapi yang kecil tidak memiliki hal yang sama dengan yang tua namun mampu melakukan hal yang lain. maka membaca puisilah saya di hari kartini, di peringatan tujuhbelasan, di pesta ulang tahun, di acara perpisahan, dan di acara keluarga besar.

duduk saya di ujung pintu kamarnya, melihat beliau menuliskan tiap kata untuk saya bawakan di malam harinya, penuh penghayatan beliau menyelami kata-kata tentang kebesaran ibu kartini sampai saya bisa menhafalnya waktu itu tanpa peduli apakah penampilannya akan dipuji, disenangi atau tidak, semua dilakukan untuk sebuah kenikmatan tersendiri.

duduk saya di sini mengenang itu semua, di saat hati dan pikiran saya mengingatnya namun belum sekatapun tertulis untuk sebuah puisi.

bila dulu ibu bisa menulis puisi kepahlawanan karena beliau mendidik anak-anak untuk mencintai dan menghormati pahlawan, maka saya hanya menulis puisi tentang cinta murahan, tentang ketololan diri saya, dan masih sekali tentang sebuah pengorbanan hidup.

ibu....saya ingin menulis puisi lagi. rangkaian kata-kata indah yang tidak murahan untuk siapapun yang membacanya, tapi mungkinkah menulis sebuah puisi yang seperti itu? yang berisi tentang kehidupan dari segala sisinya dalam satu puisi?

saya akan mencobanya.....judulnya:

Puisi untuk semua

di bibir jendela dalam remang malam kota
di bawah sana bias lampu merah kuning biru hijau
terlelap anak-anak dalam dekap hangat ibunya
tersandar mesra perempuan-perempuan di dada bidang lelaki-lelakinya
terbujur kaku tubuh keriput di atas pembaringan sakit
tertelungkup meringkuk tubuh tak berteduh atap di atas jalanan

di ketinggian jendela dalam dingin malam kota
di batas cakrawala yang pekat gelap berdebu
sisa panas siang menyebarkan aroma di malam hari
sederet doa terucap dibibir-bibir yang merinduNYA
serentet kata terdengar dalam berbagai alunan melodi menghentak dan syahdu
sekecap makian saut menyahut melampiaskan segala rasa

di balik kaca jendela dari hempasan angin malam kota
di kejauhan mata memandang hitam merah, kuning, biru dan hijau
putih menggambarkan kesucian
hitam menggambarkan kegelapan
abu-abu menyeruak di antara batas putih dan hitam
semua merasakan putih dan hitam dan berdiri dibatas abu-abu
semua merasakan dekapan, sandaran, kekakuan, doa, makian dan alunan

menjauh dari bibir jendela di dalam bilik di sebuah kota
merasakan siang dan melihat malam
melihat siang dan mengingat malam
masih diberi hidup
masih mampu bersyukur
sebelum semuanya hilang dan pergi

(di samping jendela keduapuluh)

 SABTU 2 JULI 2011

 

the thing is

the only thing that can turn the 'want it' feeling into the 'need it' thought and action.
the only thing that can make me feel beautiful without even look at my reflection in the mirror.
the only thing that can make me to have a reason to have it.
the thing is ...shoes.

semua tentang saya

menulis hal-hal menyedihkan lebih mudah buat saya ketimbang menulis hal-hal menyenangkan. terlebih menulis tentang orang lain, walaupun kemampuan mengobservasi saya tidaklah tajam dan terdeskripsikan dengan jelas. hanya akan sedikit mudah dituliskan bila lah saya secara tidak langsung merupakan bagian dari kejadian atau orang tersebut.

saya jelas orang yang kurang sensitif terhadap lingkungan atau mungkin tidak peka. tapi saya punya alasan untuk melakukan dan bersikap seperti itu, karena saya justru amat sangat sensitif maka saya menjadi tidak peka. begini contoh sederhananya, saya lebih sering berjalan menunduk dan mendengarkan mp3 daripada menatap ke depan dan memperhatikan samping kiri kanan perjalanan kaki saya dan melemparkan senyum kepada orang-orang yang saya temui di jalan baik saya kenal atau tidak. tapi pernah, pernah saya melakukannya dan hasilnya menyenangkan karena orang-orang itu yang tidak saya kenal itu juga membalas senyum saya dan langkah saya menjadi lebih ringan dan mantap. tapi bagaimana saya bisa tersenyum selalu bila jalanan yang saya lalui lebih banyak orang meminta-minta dan menengadahkan tangannya untuk sekedar meminta belas kasih dari orang-orang yang lewat. apakah senyum saya cukup baginya. apa pikirnya bila saya hanya melemparkan senyum setiap kali melewatinya duduk di jembatan penyeberangan dan di pinggir jalan itu? barangkali yang dipikirkan "saya tidak perlu senyummu mbak, saya butuh uangmu untuk makan, untuk beli baju, untuk bayar kotak tempat tidur saya".

jadi yang terjadi selanjutnya adalah saya yakini adalah lebih parah dari tersenyum, karena saya menundukkan kepala dan sama sekali tidak menatap mereka, saya bahkan berlagak mereka tak ada atau tak tampak, saya kadang memalingkan wajah berpura-pura tidak melihat mereka hanya karena saya tidak tega melihat mereka, menatap telapak tangannya dan melihat wajahnya yang hitam legam terbakar matahari. saya mudah menangis.

tapi kenapa saya juga tidaklah memberi apa yang mereka harapkan? sedikit dari beberapa ribu yang saya habiskan setiap harinya, apa beratnya? jawab saya "sama sekali tidak berat, tidak ada yang berat dari sedekah". tapi sekali lagi kenapa saya tidak memberi mereka, seperti dulu-dulu? ya, saya dulu rajin memberi mereka, dan saya percaya bahwa semakin banyak dan ikhlas saya memberi semakin banyak milik saya sendiri. jawabannya adalah otak saya sudah memilih untuk tidak (sering) melakukan itu lagi karena otak saya pernah menonton dan membaca bahwa sebagaian dari mereka adalah orang-orang pemalas yang lebih senang merendahkan diri mereka dengan menengadahkan tangan meminta belas kasihan orang lain yang telah berusaha keras mendapatkan segala sesuatu untuk menjalani hidup ini. bahwa otak saya menyuruh mata saya untuk tidak percaya bahwa seorang ibu meletakkan tiga orang anaknya yang masih kecil-kecil dan sebaya dan apakah mungkin mereka bisa lahir dalam waktu bersamaan dan jadi apakah mungkin mereka anak si ibu ini untuk bersama-sama mengemis di jembatan penyeberangan itu sampai malam hari dan di titik yang sama setiap hari...setiap hari!. ibu macam apakah itu, dan bapak macam apakah itu yang mampu mengumbar nafsunya untuk bisa menghamili ibu itu dan membiarkan si ibu sendirian memberi makan mereka, paling tidak itu yang tampak dari luar dan saya lihat.

jadi otak saya memutuskan untuk mendiamkan mereka, saya tak tergoyahkan sejak saja rajin melewati jembatan-jembatan penyeberangan itu. kenapa? lagi-lagi saya punya alasan lain:

fakir miskin dan anak terlantar adalah tanggung jawab negara, tapi kenapa negaraku masih terlihat sebaran mereka di tempat-tempat itu, apa yang telah negaraku lakukan untuk mereka?

anak-anak adalah tanggung jawab orang tuanya atau lebih tepatnya bapaknya tapi dimana bapak-bapaknya dan kenapa anak-anak itu tidak ditempatkan di sekolah atau paling tidak bila malam tiba diletakkan ditempat yang layak.

banyak sarana untuk membantu mereka yang fakir dan miskin namun tidak merendahkan diri mereka, mereka yang tetap berusaha, bekerja dan menjaga harga dirinya, mereka adalah para pejuang tangguh yang mana saya mengagumi kegigihan mereka. contohnya pembantu saya, office boy di kantor saya, pedagang rokok di pinggir jalan, pedagang gorengan yang walaupun bisa menyebabkan jerawatan dan typus bila kebanyakan makan gorenan, penyapu jalan, pedagang kue-kue kecil...ah saya jadi ingat dengan pedagang kue tradisional depan kantor saya, saya kan mulai sering membelinya untuk membantunya. walaupun ada hal-hal yang mengganjal dari sebagian usaha mereka, lagi-lagi negara saya, apa yang telah negara saya lakukan untuk mereka, karena para pejuang tangguh ini melakukan usaha dimanapun dan kapanpun mereka mau. mereka hampir tidak memperdulikan larangan tempat, larangan rambu lalulintas, keindahan tata kota, kebersihan dan kenyamanan pemandangan dan kenyamanan berjalan di trotoar.

ah negaraku, sulitnya mengurus hal yang kelihatannya sepele seperti itu, bahkan hanya sekota "kecil" ibukota inipun sulit sekali apalagi beribu-ribu pulau di negaraku. jelas saya tidak akan mencalonkan diri menjadi presiden sepertinya dalam sepuluh tahun ke depan, karena mengurusi pengemis dan pejuang tangguh pinggir jalan saja saya tak mampu, saya hanya bisa berdalih seperti orang-orang itu bahwa itu adalah masalah kompleks, perlu penanganan integral, payung hukum integral, perlu komitmen bersama..bla..bla..bla...

jadi apa yang bisa saya lakukan? saya mencoba melakukan hal yang menurut saya baik untuk menjadikannya lebih baik di lingkup semampu saya, maka teman-teman saya dan saya membuat 20ribuanakasuh kami dan obsesi kami. kami tau itu masih kurang dan amat sangat kurang sekali tapi paling tidak kami punya hati.

terlalu banyak saya di dalam tulisan ini, semua sebenarnya tentang saya, ...saya dan saya...tulisan adalah selalu tentang saya ...sebenarnya dan bukan tentang mereka. kesombongan saya.

(bila tulisan tentang saya mampu membuat orang berpikir tentang diri mereka dan orang lain dan berbuat lebih baik, mencoba lebih baik, membantu untuk menjadi lebih baik dan tidak hanya diam maka saya akan tetap dan terus menulis tentang diri saya sampai tidak ada saya lagi karena toh saya ada karena mereka)

program paskal

Pascal (bahasa pemrograman)

Dari Wikipedia

Langsung ke: navigasi, cari

Pascal adalah bahasa pemrograman yang pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971. Dengan mengambil nama dari matematikawan Perancis, Blaise Pascal, yang pertama kali menciptakan mesin penghitung, Profesor Niklaus Wirth membuat bahasa Pascal ini sebagai alat bantu untuk mengajarkan konsep pemrograman komputer kepada mahasiswanya. Selain itu, Profesor Niklaus Wirth membuat Pascal juga untuk melengkapi kekurangan-kekurangan bahasa pemrograman yang ada pada saat itu.

Kelebihan

Kelebihan dari bahasa pemrograman Pascal adalah:

• Tipe Data Standar, tipe-tipe data standar yang telah tersedia pada kebanyakan bahasa pemrograman. Pascal memiliki tipe data standar: boolean, integer, real, char, string,
• User defined Data Types, programmer dapat membuat tipe data lain yang diturunkan dari tipe data standar.
• Strongly-typed, programmer harus menentukan tipe data dari suatu variabel, dan variabel tersebut tidak dapat dipergunakan untuk menyimpan tipe data selain dari format yang ditentukan.
• Terstruktur, memiliki sintaks yang memungkinkan penulisan program dipecah menjadi fungsi-fungsi kecil (procedure dan function) yang dapat dipergunakan berulang-ulang.
• Sederhana dan Ekspresif, memiliki struktur yang sederhana dan sangat mendekati bahasa manusia (bahasa Inggris) sehingga mudah dipelajari dan dipahami.

Bahasa PASCAL juga merupakan bahasa yang digunakan sebagai standar bahasa pemrograman bagi tim nasional Olimpiade Komputer Indonesia (TOKI). Selain itu, Bahasa PASCAL masih digunakan dalam IOI (International Olympiad in Informatics).

Tipe Data

Dalam bahasa Pascal terdapat beberapa jenis tipe data yang bisa digunakan untuk sebuah variabel atau konstanta pada program. Tipe Data tersebut antara lain adalah

Tipe Data	Deskripsi (range variabel)
Byte	angka dari 0 sampai 255
Integer	angka dari -32768 to 32767
Real	semua nilai pecahan dari 1E-38 to 1E+38
Boolean	nilai TRUE atau FALSE
Char	semua karakter dari tabel ASCII
String	semua huruf, spasi, frase

Bahasa Pemograman

1.   Bahasa pemrograman, atau sering diistilahkan juga dengan Bahasa komputer adalah teknik komando/instruksi standar untuk memerintah komputer Bahasa pemrograman ini merupakan suatu himpunan dari aturan  sintaks dan simantik yang dipakai untuk mendefinisikan program komputer Bahasa ini memungkinkan seorang programmer dapat menentukan secara persis data mana yang akan diolah oleh komputer, bagaimana data ini akan disimpan/diteruskan, dan jenis langkah apa secara persis yang akan diambil dalam berbagai situasi.
Menurut tingkat kedekatannya dengan mesin komputer, bahasa pemrograman terdiri dari:

1. Bahasa Mesin, yaitu memberikan perintah kepada komputer dengan memakai kode bahasa biner, contohnya 01100101100110
2. Bahasa Tingkat Rendah, atau dikenal dengan istilah bahasa rakitan (bah.Inggris Assembly), yaitu memberikan perintah kepada komputer dengan memakai kode-kode singkat (kode mnemonic), contohnya MOV, SUB, CMP, JMP, JGE, JL, LOOP, dsb.
3. Bahasa Tingkat Menengah, yaitu bahasa komputer yang memakai campuran instruksi dalam kata-kata bahasa manusia (lihat contoh Bahasa Tingkat Tinggi di bawah) dan instruksi yang bersifat simbolik, contohnya {, }, ?, <<, >>, &&, ||, dsb.
4. Bahasa Tingkat Tinggi, yaitu bahasa komputer yang memakai instruksi berasal dari unsur kata-kata bahasa manusia, contohnya begin, end, if, for, while, and, or, dsb.

Sebagian besar bahasa pemrograman digolongkan sebagai Bahasa Tingkat Tinggi, hanya bahasa C yang digolongkan sebagai Bahasa Tingkat Mene

               Bahasa program dibagi menjadi 3,yaitu :

• Bahasa pemrograman tingkat rendah (low level language), merupakan bahasa pemrograman generasi pertama, bahasa pemrograman jenis ini sangat sulit dimengerti karena instruksinya menggunakan bahasa mesin. Biasanya yang mengerti hanyalah pembuatnya saja karena isinya programnya berupa kode-kode mesin.
• Bahasa pemrograman tingkat menengah (middle level language), merupakan bahasa pemrograman dimana pengguna instruksi sudah mendekati bahasa sehari-hari, walaupun begitu masih sulit untuk dimengerti karena banyak menggunakan singkatan-singkatan seperti “STO” artinya simpan (STORE) dan “MOV” artinya pindahkan (MOVE). Yang tergolong dalam bahasa ini adalah assembler.
• Bahasa pemrograman tingkat tinggi (high level language) merupakan bahasa yang mempunyai ciri lebih terstruktur, mudah dimengerti karena menggunakan bahasa sehari-hari, contoh bahasa level ini adalah: Delphi, Pascal, ORACLE, MS-SQL, Perl, Phyton, Basic, Visual Studio (Visual Basic, Visual FoxPro), Informix, C, C++, ADA, Java, PHP, ASP, XML, dan lain-lain. Bahasa seperti Java, PHP, ASP, XML biasanya digunakan untuk pemrograman pada internet, dan masih banyak lagi yang terus berkembang yang saat ini biasanya dengan ekstensi .net (baca: dot net) seperti Visual Basic.NET dan Delphi.Net yang merupakan bahasa pemrograman yang dikembangkan pada aran berbasis internet

Sejauh ini bahasa pemrograman dikelompokkan menjadi lima generasi. Setiap generasi bahasa pemrograman memiliki karakteristik tersendiri. Semakin maju generasinya maka orientasi bahasa pemrograman ini akan semakin dekat ke manusia.

Gambar di atas menunjukkan terjadinya kecenderungan pergeseran orientasi dalam bahasa-bahasa pemrograman, dari pendekatan yang berorientasi kepada mesin menuju ke pendekatan yang berorientasi pada manusia.

Bahasa Pemrograman Generasi I

Bahasa pemrograman generasi pertama berorientasi pada mesin. Program disusun dengan menggunakan bahasa mesin. Tentu saja program generasi ini sangat sulit untuk dipahami oleh orang awam dan sangat membosankan bagi pemrogram. Pemrogram harus benar-benar menguasai operasi komputer secara teknis. Namun bahasa generasi ini memberikan eksekusi program yang sangat cepat. Selain itu, bahasa mesin sangat bergantung pada mesin (machine dependent), artinya, bahasa mesin antara satu mesin dengan mesin lainnya akan berbeda.

Kode dalam Bahasa Mesin

Bahasa Pemrograman Generasi II

Bahasa pemrograman generasi kedua menggunakan bahasa rakitan (assembly). Sebagai pengganti kode-kode biner, digunakanlah kependekan dari kata-kata. Misalkan “MOV” untuk menyatakan “MOVE” dan JNZ yang berarti “jump non-zero”. Setiap instruksi dalam bahasa rakitan sebenarnya identik dengan satu instruksi dalam bahasa mesin. Bahasa ini sedikit lebih mudah dipahami daripada bahasa mesin. Bahasa ini sedikit lebih mudah dipahami daripada bahasa mesin mengingat perintah dalam bentuk kata-kata yang dipendekkan lebih mudah daripada mengingat deretan angka biner.
Berikut adalah contoh instruksi yang ditulis dalam bahasa rakitan akan menjadi seperti berikut:
Tampak bahwa penggunaan notasi seperti MOV AH, 02 jauh lebih mudah diingat atau dipahami daripada penulisan instruksi dalam bahasa mesin: B402 atau 1011 0100 0000 0010.

Bahasa Pemrograman Generasi III

Bahasa pemrograman generasi ketiga menggunakan pendekatan prosedural. Sebagai bahasa prosedural, pemrogram perlu menuliskan instruksi-instruksi yang rinci agar komputer melaksanakan tugasnya. Program ditulis dengan menggunakan kata-kata yang biasa dipakai manusia, seperti WRITE untuk menampilkan sesuatu di layar dan READ untuk membaca data dari keyboard.
Bahasa generasi ketiga seringkali disebut sebagai high level language disebabkan bahasa ini menggunakan kata-kata yang biasa digunakan manusia. Beberapa contoh bahasa pemrograman yang masuk dalam kategori generasi ketiga yaitu ADA, ALGOL, C, BASIC, COBOL, FORTRAN, dan PASCAL.

Bahasa Pemrograman Generasi IV

Bahasa pemrograman generasi keempat dirancang untuk mengurangi waktu pemrograman dalam membuat program sehingga diharapkan produktifitas pemrogram jadi meningkat dan program dapat dibuat dalam waktu yang lebih singkat. Alhasil, bahasa pemrograman generasi keempat yang dikenal dengan sebutan 4GL dapat dipakai oleh pemakai yang kurang mengetahui hal-hal teknis tentang pemrograman tanpa bantuan pemrogram profesional. Sebagai contoh pemrogram dapat membuat program dengan Microsoft Access di lingkungan PC dengan mudah.
Bahasa pemrograman generasi keempat biasa disebut sebagai high level language atau bahasa berorientasi pada masalah (problem oriented language) karena memungkinkan pemakai menyelesaikan masalah dengan sedikit penulisan kode dibandingkan pada bahasa prosedural. Bahasa pemrograman generasi keempat menggunakan pendekatan non-prosedural. Untuk mendapatkan suatu hasil, seorang pemakai tidak perlu memberitahukan secara detail tentang bagaimana mendapatkannya. Gambar di bawah ini memberikan contoh yang menunjukkan perbedaan bahasa prosedural dan non-prosedural dalam memperoleh data tentang seorang mahasiswa.

Bahasa Pemrograman Generasi V

Bahasa pemrograman generasi kelima merupakan kelompok bahasa-bahasa pemrograman yang ditujukan untuk menangani kecerdasan buatan (artificial intelligence). Kecerdasan buatan adalah disiplin dalam ilmu komputer yang mempelajari cara komputer meniru kecerdasan manusia. Berbagai aplikasi kecerdasan manusia adalah sebagai berikut:

• Pemrosesan bahasa alami (natural language processing), yakni mengatur komputer agar bisa berkomunikasi dengan manusia melalui bahasa manusia (Indonesia, Inggris, Spanyol, Prancis, dan sebagainya).
• Pengedalian robotika dan sensor mata.
• Aplikasi sistem pakar (expert system) yang meniru seorang pakar di bidang tertentu sehingga bisa menghasilkan nasehat atau pemikiran yang setara dengan seorang pakar.

Dengan menggunakan bahasa generasi kelima dimungkinkan untuk melakukan perintah dengan cara percakapan seperti berikut:
“Tampilkan semua nama mahasiswa yang IPK-nya di atas 3,0 dan urutkan berdasarkan IP secara descending”
PROLOG dan LISP merupakan dua contoh bahasa pemrograman yang ditujukan untuk menangani kecerdasan buatan
ngah dan Assembly yang merupakan Bahasa Tingkat Rendah.

Algoritma

Bahasa bahasa pemograman dapat dikelompokkan menjadi
1.BAhasa berasas Tinggi (High level language)
2.Bahasa berasas Rendah (Low -leve  language)

Algoritma ada dua jenis:
1.Algoritma masukan
2..Algoritm & keluaran
Cara menuangkan Algoritma kedalam bentuk program
Langkah-langkah menuangkan Algoritma kedalam program ditentukan oleh Faktor bahasa Pemograman yang akan digunakan.


Ada Tiga Macam Struktur Dasar Algoritma
1.Sekuensial (Runtunan)
2.Seleksi
3.Pengulangan

algoritma

Algoritma adalah urutan langkah langkah yang logis untuk mencegah masalah.
Kata algoritma diambil dari nama seorang nama ilmuan Persia Abu Ja'far muhammad Ibn Musa Al-Khowarizmi,yang menulis buku berjudul,Litab Al Jabr'Al-Mugabala(Rules Of Restiration and Reduction,pada sekitar Tahun 1825.

            JENIS-JENIS PROSES ALGORITMA
1.Sequence proses,proses yang berurutan (Runut)
2.Selction proses,proses pemilihan.
3.Iteration proses,proses pengulan.

OPERATOR ARITMATIKA
Operator aritmatika digunakan untuk proses aritmatika seperti penjumlahan,pengurangan,perkalian,& pembagian.Pembagian bilanga bilangn bulat sisa pembagian berupa pecahan akan dibagikan .
Operator % tidak bisa digunakan terhadap data berupa float/double.

Pemograman adlah kumpulan intruksi intruksi yang digunakan untuk mengatur komputer agar melaukan suatu tindakan tertentu.

Dalam konteks pemograman terdapat sejumlah bahasa pemograman seperti
-Pascal
-Bahasa C
-C++
-Basic
Secara garis besar bahasa pemograman

algoritma

Dalam matematika dan komputasi, algoritma atau algoritme ^[1] merupakan kumpulan perintah untuk menyelesaikan suatu masalah. Perintah-perintah ini dapat diterjemahkan secara bertahap dari awal hingga akhir. Masalah tersebut dapat berupa apa saja, dengan catatan untuk setiap masalah, ada kriteria kondisi awal yang harus dipenuhi sebelum menjalankan algoritma. Algoritma akan dapat selalu berakhir untuk semua kondisi awal yang memenuhi kriteria, dalam hal ini berbeda dengan heuristik. Algoritma sering mempunyai langkah pengulangan (iterasi) atau memerlukan keputusan (logika Boolean dan perbandingan) sampai tugasnya selesai.
Desain dan analisis algoritma adalah suatu cabang khusus dalam ilmu komputer yang mempelajari karakteristik dan performa dari suatu algoritma dalam menyelesaikan masalah, terlepas dari implementasi algoritma tersebut. Dalam cabang disiplin ini algoritma dipelajari secara abstrak, terlepas dari sistem komputer atau bahasa pemrograman yang digunakan. Algoritma yang berbeda dapat diterapkan pada suatu masalah dengan kriteria yang sama.
Kompleksitas dari suatu algoritma merupakan ukuran seberapa banyak komputasi yang dibutuhkan algoritma tersebut untuk menyelesaikan masalah. Secara informal, algoritma yang dapat menyelesaikan suatu permasalahan dalam waktu yang singkat memiliki kompleksitas yang rendah, sementara algoritma yang membutuhkan waktu lama untuk menyelesaikan masalahnya mempunyai kompleksitas yang tinggi