KUMPULAN TUGAS

Menu Utama

    JURUSAN / BIDANG STUDI

    TEKNIK INFORMATIKA

    PRAKTIKUM ALGORITMA DAN PEMROGRAMAN II

 

LAPORAN PRAKTIKUM

MODUL 1

 

 

 

1.  

   Permasalahan

2. Dengan masukan nilai tertentu akan ditentukan dan ditampilkan predikat yang pantas dari nilai yang bersangkutan berupa karakter dari A hingga E.

    

    

3.  

   Pendefinisian

•  

  Permasalahan Input

Tugas

UTS

UAS /* Nilai masukan yang didapat */

•  

  Permasalahan Output

Nilai /* Nilai akhir yang diperoleh */

Predikat /* Predikat dari nilai berupa (‘A’, ‘B’,

‘C’, ‘D’ atau ‘E’) */

•  

  Permasalahan Output

Predikat ‘A’ jika nilai >= 80 dan nilai <= 100

Predikat ‘B’ jika nilai >= 60 dan nilai <= 80

Predikat ‘C’ jika nilai >= 40 dan nilai <= 60

Predikat ‘D’ jika nilai >= 20 dan nilai <= 40

Predikat ‘E’ jika nilai < 20.

 

 

1.  

   Perancangan

Perancangan permasalahan tersebut memiliki algoritma dasar :

1.  

   Meminta masukan nilai.

2.  

   Membaca nilai yang dimasukkan dengan batasan tertentu dan menentukan nilai akhir beserta predikatnya.

3.  

   Menampilkan nilai akhir dan predikat bersangkutan.

 

•  

  Pseudo Code

KAMUS

Tugas,

UTS,

UAS : Integer /* Nilai input */

Nilai : Integer /* Nilai akhir */

Predikat : Char /* Output predikat yang didapat */

 

ALGORITMA

input("Nilai Tugas : ") /* Meminta masukan */

input("Nilai UTS : ") /* Meminta masukan */

input("Nilai UAS : ") /* Meminta masukan */

/* Keluaran nilai akhir */

output("Nilai akhir Anda : ", nilai)

output("Grade : ", predikat)

 

 

1.  

   Implementasi

2. /****************************************************************/

   /* PROGRAM LAPORAN PRAKTIKUM ALGORITMA DAN PEMROGRAMAN II */

   /* M O D U L 1 */

   /*** ***/

   /* iYAN inside! This way in VisiTech Jackal 14.25 DjokDja */

   /****************************************************************/

   /* Program untuk menentukan predikat yang sesuai dengan nilai */

   /* yang dimasukkan */

    

   #include<stdio.h>

   #include<conio.h>

   #include<dos.h>

   main()

   {

   int i,

   nilai,

   tugas,

   uts,

   uas;

   char hasil;

   clrscr();

   textcolor(15);

   gotoxy(18,10);

   cprintf("WELKOM TU INTERAKTIF SOFWER NGITUNG NILAI/GRED");

   textcolor(12);

   for(i=0; i<46; i++)

   { gotoxy(18+i,9); cprintf("§ ");

   gotoxy(63-i,9); cprintf("< ");

   gotoxy(63-i,11); cprintf("§ ");

   gotoxy(18+i,11); cprintf("< ");

   delay(70);

   }

   delay(2000);

   gotoxy(1,1);

   for(i=2; i<=25; i++)

   { insline();

   delay(50);

   }

   clrscr();

   textcolor(13);

   cprintf("MENENTUKAN PREDIKAT NILAI YANG DIMASUKKAN \r\n\r\n");

   /* Menerima input nilai */

   textcolor(7);

   cprintf(" Masukkan nilai yang Anda peroleh \r\n");

   cprintf(" § Nilai Tugas : ");

   scanf("%d",&tugas);

   cprintf(" § Nilai UTS : ");

   scanf("%d",&uts);

   cprintf(" § Nilai UAS : ");

   scanf("%d",&uas);

   /* Menghitung nilai akhir */

   nilai = ((0.2*tugas)+(0.3*uts)+(0.5*uas));

   cprintf("\r\n\r\n Nilai akhir Anda : ");

   printf("%d", nilai);

   /* Menentukan predikat */

   cprintf("\r\n Grade : ");

   if ((nilai>=80) && (nilai<=100))

   puts("A");

   else

   if ((nilai>=60)&&(nilai<80))

   puts("B");

   else

   if ((nilai>=40)&&(nilai<60))

   puts("C");

   else

   if ((nilai>=20)&&(nilai<40))

   puts("D");

   else

   if ((nilai>=0)&&(nilai<20))

   puts("E");

   getche();

   clrscr();

   }

    

    

3.  

   Pengujian

 

 

 

 

 

 

 

LAPORAN PRAKTIKUM

MODUL 2

 

 

 

A. Permasalahan

Dengan memasukkan tiga bilangan x, y dan z, maka akan ditentukan dan ditampilkan bilangan terbesar (nilai maksimum) serta bilangan terkecil (nilai minumum).

 

 

2.  

   Pendefinisian

•  

  Permasalahan Input

x, y, z /* Bilangan yang akan dimasukkan */

•  

  Permasalahan Output

maksimum /* Nilai terbesar yang diperoleh */

minimum /* Nilai terkecil yang diperoleh */

•  

  Rumus yang Berkenaan

maksimum = x;

Jika y > maksimum maka maksimum = y;

Jika z > maksimum maka maksimum = z.

 

minimum = y;

Jika y < x dan y < z maka minimum = y;

Jika z < x dan z < y maka minimum = z.

 

 

2.  

   Perancangan

Perancangan permasalahan tersebut memiliki algoritma dasar :

1.  

   Meminta masukan bilangan x, y dan z.

2.  

   Menghitung maksimum.

3.  

   Menghitung minimum.

4.  

   Menampilkan nilai maksimum dan nilai minimum.

 

•  

  Pseudo Code

KAMUS

x, y, z : integer /* Input bilangan */

maksimum : integer

minimum : integer

 

ALGORITMA

output("Masukkan bilangan x, y dan z")

input(x,y,z)

output("Nilai Maksimum : ", maksimum)

output("Nilai Minimum : ", minimum)

 

 

2.  

   Implementasi

3. /****************************************************************/

   /* PROGRAM LAPORAN PRAKTIKUM ALGORITMA DAN PEMROGRAMAN II */

   /* M O D U L 2 */

   /*** ***/

   /* iYAN inside! This way in VisiTech Jackal 14.25 DjokDja */

   /*************************************************

   ***************/

   /* Program untuk mencari nilai maksimum dan minimum dari tiga */

   /* bilangan interger yang dimasukkan */

   #include<stdio.h>

   #include<conio.h>

   #include<dos.h>

   main()

   { int i;

   float x, y, z,

   maksimum, minimum;

   clrscr();

   textcolor(15);

   gotoxy(18,10);

   cprintf("WELKOM TU iYAN inside! Eng Ing Eng... MODUL 2");

   textcolor(14);

   for(i=0; i<46; i++)

   { gotoxy(18+i,9); cprintf("§ ");

   gotoxy(63-i,9); cprintf("< ");

   gotoxy(63-i,11); cprintf("§ ");

   gotoxy(18+i,11); cprintf("< ");

   delay(70);

   }

   delay(2000);

   gotoxy(1,1);

   for(i=2; i<=25; i++)

   { insline();

   delay(50);

   }

   clrscr();

   textcolor(13);

   cprintf(" MENCARI NILAI MAX DAN MIN DARI TIGA INPUT BILANGAN \r\n\r\n");

   textcolor(7);

   cprintf(" Masukin Bilangan x, y en z\r\n");

   cprintf(" x = ");

   scanf("%g",&x);

   cprintf(" y = ");

   scanf("%g",&y);

   cprintf(" z = ");

   scanf("%g",&z);

   /* Mencari nilai max dan min */

   { maksimum = x;

   if (y > maksimum)

   maksimum = y;

   if (z > maksimum)

   maksimum = z;

   else

   if ((y<x)&&(y<z))

   minimum = y;

   if ((z<x)&&(z<y))

   minimum = z;

   if ((x<y)&&(x<z))

   minimum = x;

   }

   /* Tampilan */

   { sound(1100); delay(100);

   sound(800); delay(200);

   nosound();

   }

   cprintf("\r\n Dari bilangan loe tadi gue dapetin :");

   cprintf("\r\n Nilai terbesar = %g",maksimum);

   cprintf("\r\n Nilai terkecil = %g\r\n",minimum);

   cprintf("\r\n Kalo sampai salah tuh emang gue nich yang bego ngitungnya !");

   getche();

   }

    

    

4.  

   Pengujian

 

 

 

 

 

 

 

 

 

 

 

LAPORAN PRAKTIKUM

MODUL 3

 

 

 

1.  

   Permasalahan

2. Dengan masukan tanggal, bulan dan tahun kelahiran akan ditampilkan zodiak beserta ramalan secara umum tentang zodiak yang bersangkutan.

    

    

3.  

   Pendefinisian

•  

  Permasalahan Input

tgl_lhr

bln_lhr

thn_lhr

•  

  Permasalahan Output

zodiak = for (i=0; ;i++)

if ((tgl_lhr>=bintang[i].tgl_awal&&

bln_lhr==bintang[i].bln_awal)||

(tgl_lhr<=bintang[i].tgl_akhir&&

bln_lhr==bintang[i].bln_akhir))

 

 

1.  

   Perancangan

Perancangan permasalahan tersebut memiliki algoritma dasar :

1.  

   Meminta masukan tgl_lhr, bln_lhr, dan thn_lhr.

2.  

   Menentukan zodiak dan ramalan yang sesuai.

3.  

   Menampilkan zodiak beserta ramalannya.

 

•  

  Pseudo Code

KAMUS

tgl_lhr, bln_lhr, thn_lhr : integer

zodiak, ramalan : char[250]

 

ALGORITMA

/* Petunjuk Masukan */

output("Masukkan tanggal, bulan, tahun lahir Anda")

 

/* Meminta Masukan */

input(tgl_lhr, bln_lhr, thn_lhr)

 

/* Proses Penentuan */

zodiak, ramalan ¬ for (i=0; ;i++)

if ((tgl_lhr>=bintang[i].tgl_awal&&

bln_lhr==bintang[i].bln_awal)||

(tgl_lhr<=bintang[i].tgl_akhir&&

bln_lhr==bintang[i].bln_akhir))

 

 

1.  

   Implementasi

2. /****************************************************************/

   /* PROGRAM LAPORAN PRAKTIKUM ALGORITMA DAN PEMROGRAMAN II */

   /* M O D U L 3 */

   /*** ***/

   /* iYAN inside! This way in VisiTech Jackal 14.25 DjokDja */

   /****************************************************************/

   /* Program untuk menentukan zodiak/bintang beserta ramalannya */

   /* sesuai tanggal yang dimasukkan */

   #include<stdio.h>

   #include<conio.h>

   #include<dos.h>

   #include<time.h>

   #include<stdlib.h>

   main()

   { struct zodiak

   { char nama[11];

   int tgl_awal;

   int bln_awal;

   int tgl_akhir;

   int bln_akhir;

   char ramal1[75];

   char ramal2[75];

   };

   struct zodiak bintang[] =

   { {"A R I E ~ S", 21, 3,19, 4,

   "Wataknye keras/kuat pribadinye en cerdas pikirannye.",

   "Dapet dijadiin sohib yang baek en setia."},

   {"T A U R U S", 20, 4,20, 5,

   "Loe rada keras kepala, jalan pikirannye bercabang. Loe anak gaul,",

   "sabar dan jujur, tahan uji, dan slalu benci kekerasan."},

   {"G E M I N I", 21, 5,20, 6,

   "Senang keindahan, tujuan hidup ngga tetep. Peka perasaannya 'n mudah",

   "tersungging. Berlaku sabar dan jujur tapi mudah bosan pada sesuatu."},

   {"K A N S E R", 21, 6,22, 7,

   "Berwatak teguh dan mantap dalam pendirian. Perasaannya halus",

   "tapi mudah tersinggung. Suka ngelamun dan khayal yang jorok... ."},

   {"S I N G A ", 23, 7,22, 8,

   "Berwatak mudah emosional tapi bersikap sabar (???), berkepribadian",

   "sangat kuat, dan kagak mentingin kepentingan diri sendiri." },

   {"V I R G O ", 23, 8,22, 9,

   "Chamoe agak cerewet (padahal emang cerewet) & slalu berterus terang,",

   "jujur en loe begitu polos... ." },

   {"L I B R A ", 23, 9,22,10,

   "Berwatak mudah gaul ama lingkungan karena keluwesannya, cinta damai",

   "dan perasaannya halus bagai sutera."},

   {"SEKORPIO ", 23,10,21,11,

   "Berwatak punya pendirian yang berpengaruh. Pandai nyimpen rahasia,",

   "senang gaul and senang dengan urusan sosial."},

   {"SAGITARIUS ", 22,11,21,12,

   "Berwatak keras dalam pendiriannya dan tak pernah putus asa.",

   "Penampilan menarik, senang membantu orang lain, ulet dan tekun."},

   {"KAPRIKOREN ", 22,12,19, 1,

   "Suka kebesaran, berkuasa en memerintah. Suka sikap tinggi dalam sgalanya",

   "pandangan luas kedepan, genius dan pandai. He he he ge-er nich ye... ."},

   {"AKUARIUS ", 20, 1,18, 2,

   "Berwatak jujur dan dapat dipercaya. Patut dijadikan sobat dan setia",

   "pada temen. Bersifat ramah dan sabar."},

   {"I K A N ", 19, 2,20, 3,

   "Ramah & kagak egois, ulet, tabah & teguh hati dalam melaksanakan",

   "pekerjaan demi rezeki hidup. Cepat mengambil keputusan."}

   };

   int i, j,

   tgl_lhr, bln_lhr, thn_lhr;

   char nama[25];

   char *wday[] = {"Minggu", "Senen", "Slasa", "Rebo",

   "Kemiz", "Jum`at", "Setu", "kagak tau gue nich !"};

   struct tm time_check;

   { textbackground(0);

   clrscr();

   textcolor(15);

   gotoxy(17,10);

   cprintf("WELKOM TU MBAH DUKUN iNSIDE! en RAMAL INTERAKTIF");

   textcolor(10);

   for(i=0; i<48; i++)

   { gotoxy(17+i,9); cprintf("§ ");

   gotoxy(64-i,9); cprintf("< ");

   gotoxy(17+i,11); cprintf("§ ");

   gotoxy(64-i,11); cprintf("< ");

   delay(70);

   }

   delay(2000);

   gotoxy(1,1);

   for(i=2; i<=25; i++)

   { insline();

   delay(50);

   }

   clrscr();

   textcolor(13);

   cprintf(" NENTUIN BINTANG OR ZODIAC CHAMEOE PLUS RAMALANNYE \r\n\r\n");

   textcolor(7);

   cprintf(" § Nama Anda (max 25 hurup) : ");

   gets(nama);

   cprintf(" § Tanggal Lahir (DD-MM-YYYY) : ");

   scanf("%d-%d-%d", &tgl_lhr, &bln_lhr, &thn_lhr);

   }

   /* Penentuan Zodiak en Ramalanye */

   for (i=0; ;i++)

   if ((tgl_lhr >= bintang[i].tgl_awal &&

   bln_lhr == bintang[i].bln_awal)||

   (tgl_lhr <= bintang[i].tgl_akhir &&

   bln_lhr == bintang[i].bln_akhir))

   break;

   { clrscr();

   textbackground(1);

   textcolor(14);

   cprintf(" HASIL PERHITUNGAN");

   cprintf(" SIMBAH ");

   textcolor(14+BLINK);

   gotoxy(79,1);

   cprintf("þ");

   textbackground(0);

   textcolor(12);

   gotoxy(23,11);

   cprintf(" TUNGGU MBAH DUKUN LAGI NGERAMAL... . ");

   { randomize;

   for(j=1; j<=100; j++)

   { sound(j*45);

   delay(j);

   gotoxy(39,12);

   cprintf("%d %%", j);

   gotoxy(1,1);

   }

   sound(1100); delay(200);

   sound(800); delay(100);

   nosound();

   }

   gotoxy(23,11);

   cprintf(" ");

   gotoxy(23,12);

   cprintf(" ");

   textcolor(7);

   gotoxy(3,3);

   cprintf("Boeat %s,", nama);

   gotoxy(3,4);

   cprintf("Bintang sampeyan is ");

   gotoxy(3,6);

   cprintf("Ramalan");

   time_check.tm_year = thn_lhr - 1900;

   time_check.tm_mon = bln_lhr - 1;

   time_check.tm_mday = tgl_lhr;

   time_check.tm_hour = 0;

   time_check.tm_min = 0;

   time_check.tm_sec = 1;

   time_check.tm_isdst = -1;

   if (mktime(&time_check) == -1)

   time_check.tm_wday = 7;

   gotoxy(3,10);

   cprintf("Loe lahir tanggal %d-%d-%d, harinya %s",

   tgl_lhr, bln_lhr, thn_lhr, wday[time_check.tm_wday]);

   struct date d;

   getdate(&d);

   gotoxy(3,11);

   cprintf("The current date is %d-%d-%d, hi hi pake English",

   d.da_day, d.da_mon, d.da_year);

   textcolor(10);

   gotoxy(23,4);

   cprintf("%s", bintang[i].nama);

   cprintf(" ");

   gotoxy(4,7);

   cprintf("%s", bintang[i].ramal1);

   gotoxy(4,8);

   cprintf("%s", bintang[i].ramal2);

   gotoxy(34,4);

   cprintf(" ");

   textcolor(11);

   gotoxy(3,22);

   cprintf("Sorry cink kalo ramalannye jelek, bukan salah gue...");

   delay(600);

   gotoxy(3,23);

   cprintf("mungkin emang loe udah jelek beneran sich !");

   delay(600);

   gotoxy(3,24);

   cprintf("Atawa mungkin loe kurang FULUS (= do-it) ama gue... . He he matre nich gue");

   gotoxy(1,1);

   }

   getche();

   textcolor(1);

   for(j=1; j<=80; j++)

   for(i=2; i<=22; i++)

   { gotoxy(j,i-1); cprintf("Û");

   gotoxy(j,i); cprintf("²");

   gotoxy(j,i+1); cprintf("±");

   gotoxy(j,i+2); cprintf("°");

   gotoxy(1,1);

   delay(2);

   }

   textbackground(1);

   textcolor(15);

   gotoxy(33,10);

   cprintf("Thank you very much");

   delay(600);

   gotoxy(27,11);

   cprintf("Keep DjokDja in peace and love... .");

   delay(1500);

   textbackground(0);

   textcolor(7);

   clrscr();

   return 0;

   }

    

    

    

    

    

    

    

    

    

3.  

   Pengujian

 

 

 

LAPORAN PRAKTIKUM

MODUL 4

 

 

 

1.  

   Permasalahan

2. Dengan masukan tanggal, bulan dan tahun kelahiran akan ditampilkan zodiak yang bersangkutan.

    

3.  

   Pendefinisian

•  

  Permasalahan Input

tgl_lhr

bln_lhr

thn_lhr

•  

  Permasalahan Output

zodiak = for (i=0; ;i++)

if ((tgl_lhr>=bintang[i].tgl_awal&&

bln_lhr==bintang[i].bln_awal)||

(tgl_lhr<=bintang[i].tgl_akhir&&

bln_lhr==bintang[i].bln_akhir))

 

 

1.  

   Perancangan

Perancangan permasalahan tersebut memiliki algoritma dasar :

1.  

   Meminta masukan tgl_lhr, bln_lhr, dan thn_lhr.

2.  

   Menentukan zodiak yang sesuai.

3.  

   Menampilkan zodiak.

 

•  

  Pseudo Code

KAMUS

tgl_lhr, bln_lhr, thn_lhr : integer

zodiak : char[250]

 

ALGORITMA

/* Petunjuk Masukan */

output(‘Masukkan tanggal, bulan, tahun lahir Anda’)

 

/* Meminta Masukan */

input(tgl_lhr, bln_lhr, thn_lhr)

 

/* Proses Penentuan */

zodiak, ramalan ¬ for (i=0; ;i++)

if ((tgl_lhr>=bintang[i].tgl_awal&&

bln_lhr==bintang[i].bln_awal)||

(tgl_lhr<=bintang[i].tgl_akhir&&

bln_lhr==bintang[i].bln_akhir))

 

 

1.  

   Implementasi

2. /*******************************************************BETA 1***/

   /* PROGRAM LAPORAN PRAKTIKUM ALGORITMA DAN PEMROGRAMAN II */

   /* M O D U L 4 */

   /*** ***/

   /* iYAN inside! This way in VisiTech Jackal 14.25 DjokDja */

   /****************************************************************/

    

   /* Program untuk menentukan zodiak/bintang */

   /* sesuai tanggal yang dimasukkan */

    

   #include <stdio.h>

   #include<conio.h>

   #include<dos.h>

    

   main()

   { clrscr();

   struct zodiak

   { char nama[15];

   int tgl_awal;

   int bln_awal;

   int tgl_akhir;

   int bln_akhir;

   };

    

   struct zodiak bintang[] =

   { {"A R I E S ", 21, 3,19, 4},

   {"TAURUS ", 20, 4,20, 5},

   {"GEMINI ", 21, 5,20, 6},

   {"CANCER ", 21, 6,22, 7},

   {"L E O ", 23, 7,22, 8},

   {"V I R G O ", 23, 8,22, 9},

   {"L I B R A ", 23, 9,22,10},

   {"SCORPIO ", 23,10,21,11},

   {"SAGITARIUS", 22,11,21,12},

   {"CAPRICORN ", 22,12,19, 1},

   {"AQUARIUS ", 20, 1,18, 2},

   {"PISCES ", 19, 2,20, 3}

   };

    

   int i,tgl_lhr,bln_lhr,thn_lhr;

   char nama;

    

   { textcolor(7);

   printf(" MENENTUKAN ZODIAK BERDASARKAN INPUT TANGGAL \n\n");

   textbackground(1);

   textcolor(14);

   cprintf(" Nama Pendek Anda : ");

   scanf("%s",&nama);

   cprintf(" Tanggal Lahir Anda : ");

   scanf("%d",&tgl_lhr);

   cprintf(" Bulan Lahir Anda : ");

   scanf("%d",&bln_lhr);

   cprintf(" Tahun Lahir Anda : ");

   scanf("%d",&thn_lhr);

   }

    

   /* Penentuan zodiak */

   for (i=0; ;i++)

   if ((tgl_lhr >= bintang[i].tgl_awal &&

   bln_lhr == bintang[i].bln_awal)||

   (tgl_lhr <= bintang[i].tgl_akhir&&

   bln_lhr == bintang[i].bln_akhir))

   break;

   { textbackground(17);

   gotoxy(45,3);

   textmode(C40);

   cprintf(" Bintang Anda adalah :..........................................................\n");

   cprintf("..................................................

   ..............................\n");

   cprintf("..................................................

   ..............................\n");

   cprintf("..................................................

   ..............................\n");

   cprintf("..................................................

   ..............................\n");

   cprintf("..................................................

   ..............................\n");

   cprintf("..................................................

   ..............................\n");

   cprintf("..................................................

   ..............................\n");

    

   textbackground(17);

   gotoxy(17,10);

   textcolor(20+BLINK);

   cprintf("%s",bintang[i].nama);

   }

    

   getche();

   }

   Program di atas hanyalah pemakaian algoritma dasar, mungkin ada per-bedaaan/pengembangan dengan yang disertakan dalam disket.

    

    

3.  

   Pengujian

 

 

 

 

 

 

LAPORAN PRAKTIKUM

MODUL 5

 

 

1.  

   Permasalahan

2. Dengan memasukkan prototype, text, beserta i, j, k intern dari dalam program akan ditampilkan variasi layar baik bentuk maupun background layar.

    

    

3.  

   Pendefinisian

•  

  Permasalahan Input

i, j, k

prototype

•  

  Permasalahan Output

Variasi_layar

 

 

1.  

   Perancangan

Perancangan permasalahan tersebut memiliki algoritma dasar :

1.  

   Membaca masukan i, j, k prototype, textcolor, textbackground.

2.  

   Menampilkan variasi layar.

 

•  

  Pseudo Code

KAMUS

i, j, k : integer /* Input masukan untuk variasi */

text : char /* Output teks */

 

 

1.  

   Implementasi

2. /****************************************************************/

   /* PROGRAM LAPORAN PRAKTIKUM ALGORITMA DAN PEMROGRAMAN II */

   /* M O D U L 5 */

   /*** ***/

   /* iYAN inside! This way in VisiTech Jackal 14.25 DjokDja */

   /****************************************************************/

   /* Program manipulasi tampilan layar */

   #include<stdlib.h>

   #include<stdio.h>

   #include<conio.h>

   #include<string.h>

   #include<dos.h>

   #include<graphics.h>

   #include<math.h>

   main()

   { int i, j, k;

   static char st[] [60] =

   { "WELKOM TU TURBO CHE PLUS PLUS INTERAKTIF ",

   "KREATED BAI iYAN inside! ",

   "1999 ",

   " i Y A N i n s i d e ! ",

   " Djoeroesan Technix Inphormatika ",

   " Fuck! oeltas Technologi Indoestri ",

   " Universitas Islam Indonesia ",

   "this way in (TM) ",

   "iyan.kotagede@usa.net ",

   };

   randomize();

   textbackground(0);

   clrscr();

   textcolor(7);

   gotoxy(21,10); cprintf(st[0]);

   gotoxy(29,20); cprintf(st[1]);

   gotoxy(39,21); cprintf(st[2]);

   textcolor(10);

   for(i=0; i<46; i++)

   { gotoxy(18+i,9); cprintf("þ");

   gotoxy(63-i,9); cprintf("Û");

   gotoxy(18+i,11); cprintf("þ");

   gotoxy(63-i,11); cprintf("Û");

   delay(70);

   }

   delay(2000);

   clrscr();

   for(k=1; k<30; k++)

   for(j=1; j<81; j++)

   for(i=2; i<25; i++)

   { textcolor(random(15));

   gotoxy(j,i); cprintf("þ");

   textcolor(14+random(2));

   gotoxy(27,12); cprintf(st[3]);

   }

   clrscr();

   for(j=1; j<9; j++)

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

   { delay(60);

   textbackground(j);

   window(41-4*i, 11-i, 40+4*i, 15+i);

   clrscr();

   }

   textbackground(0);

   clrscr();

   textcolor(7);

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

   { textcolor(7);

   gotoxy(6+random(69),2+random(23));

   cprintf("ú");

   textcolor(11);

   gotoxy(24,11); cprintf(st[4]);

   textcolor(12);

   gotoxy(23,12); cprintf(st[5]);

   textcolor(13);

   gotoxy(26,13); cprintf(st[6]);

   gotoxy(1,1);

   delay(1);

   }

   delay(1000);

   for(i=2; i<=25; i++)

   { insline();

   delay(40);

   }

   textcolor(1);

   for(j=1; j<=80; j++)

   for(i=2; i<=22; i++)

   { gotoxy(j,i-1); cprintf("Û");

   gotoxy(j,i); cprintf("²");

   gotoxy(j,i+1); cprintf("±");

   gotoxy(j,i+2); cprintf("°");

   gotoxy(1,1);

   delay(2);

   }

   for(j=8; j<=13; j++)

   for(i=20; i<=60; i++)

   { textbackground(0);

   window(i+1,j+1,i+1,j+1);

   clrscr();

   textbackground(7);

   window(i,j,i,j);

   clrscr();

   delay(5);

   }

   window(20,8,60,13);

   clrscr();

   textcolor(0);

   gotoxy(9,3); cprintf(st[7]);

   gotoxy(13,4); cprintf(st[8]);

   delay(2000);

   textbackground(0);

   window(1,1,80,25);

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

   { delline();

   delay(60);

   }

   clrscr();

   /******************** Grafik Coy *********************/

   int midx, midy;

   int driver = DETECT,md;

   /* Sesuaikan direktorinya! */

   initgraph(&driver,&md,"E:\\bahasa\\turboc3");

   midx = getmaxx() / 2;

   midy = getmaxy() / 2;

   settextjustify(CENTER_TEXT, CENTER_TEXT);

   textcolor(15);

   settextstyle(DEFAULT_FONT, HORIZ_DIR, 2);

   outtextxy(midx,30,"Program Praktikum");

   outtextxy(midx,75,"Modul 5");

   settextstyle(DEFAULT_FONT, HORIZ_DIR, 3);

   outtextxy(midx,53,"Algoritma Pemrograman II");

   settextstyle(TRIPLEX_FONT, HORIZ_DIR, 7);

   outtextxy(midx,midy,"iYAN inside!");

   settextstyle(TRIPLEX_FONT, HORIZ_DIR, 4);

   outtextxy(midx,midy+50,"97 523 083");

   delay(2000);

   setcolor(0);

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

   { line(0,getmaxy()-i,getmaxx(),getmaxy()-i);

   delay(5);

   }

   setcolor(getmaxcolor());

   setfillstyle(CLOSE_DOT_FILL, getmaxcolor());

   rectangle(0, 0, getmaxx(), getmaxy());

   circle(getmaxx() / 3, getmaxy() /2, 50);

   circle(getmaxx() / 2, 20, 100);

   circle(getmaxx()-20, getmaxy()-50, 75);

   circle(20, getmaxy()-20, 25);

   floodfill(2, 2, getmaxcolor());

   delay(1000);

   for(j=1; j<=40; j++)

   for(i=EMPTY_FILL; i<USER_FILL; i++)

   { setfillstyle(i, random(15+1));

   bar3d(0+random(getmaxx()), getmaxy(), random(getmaxx())+random(100),

   getmaxy()-random(getmaxy()), random(15)+3 , 1);

   delay(random(50)+1);

   }

   setcolor(10);

   for(j=1; j<=16; j++)

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

   { setcolor(j);

   line(0,getmaxy(),getmaxx(),getmaxy()+1-i);

   line(0,i-1,getmaxx(),0);

   delay(2);

   }

   delay(1000);

   closegraph();

   printf(" Thank you for join us !");

   delay(2000);

   clrscr();

   return 0;

   }

    

    

3.  

   Pengujian

 

 

 

 

 

 

 

<© 170599 by iYAN, Html 301099>

 

 

---

    

    Tugas Mata Kuliah :

1. Matematika Diskret
2. Metodologi Penelitian Teknik
3. Sistem Operasi II
4. Praktikum Algoritma dan Pemrograman 2
5. Praktikum Sistem Operasi (A)
6. Praktikum Sistem Operasi (B)

 

 

Identitas Diri | Cerita Pengalaman | Kumpulan Foto

Catatan Kuliah | Kumpulan Tugas

Dunia Komputer

Copyright(c) 1999 by Yanuar Firdaus A.W