Syukur (Alhamdulillahirabbil'alamin)

Ya Alloh semoga saya bukan termasuk orang yang tidak bersyukur atas semua nikmat yang telah Engkau berikan pada hambamu. Aku sangat bersyukur atas semua yang telah aku ada saat ini, dan aku tidak akan menolak apapun yang akan Engkau berikan selanjutnya. Berikan hambamu ini kekuatan dan keikhlasan agar bisa tetap menerima semua nikmat-Mu. Aamiin...!!

Banyak doa dan harapan yang ingin aku minta, tapi saya masih belum mampu untuk meminta, karena saya telah banyak melakukan kesalahan. "Kapan mau bangkit dari keadaan seperti ini?", saya juga tidak menginginkan situasi seperti sekarang, Engkau maha tahu tentang semua Makhluk-Mu, dan tahu apa isi hati dari hamba-Mu.

Read more!

Tugas Delphi 1 (Struktur Data)

Untuk tugas kuliah yang akan diposting kali ini yaitu tugas menggunakan program delphi dengan menggunakan perintah perulangan : For to do, For downto Do, While Do, dan Repeat Until. Ditambahkan lagi program untuk mencetak hasil bilangan berbangkat. Listing programnya adalah seperti berikut ini :

unit fortodo;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, StdCtrls;

Read more!

Simulasi 2 Router (Cisco Packet Tracer)

Router

Router adalah sebuah alat yang mengirimkan paket data melalui sebuah jaringan atau internet menuju tujuannya, melalui sebuah proses yang dikenal dengan istilah routing¹.

Router banyak digunakan dalam jaringan komputer, karena alat ini berfungsi untuk menghubungkan jaringan yang berbeda segmen. Misalnya, dari jaringan dengan kelas A, dihubungkan dengan jaringan kelas B, jika ingin menghubungkan kedua jaringan tersebut kita harus menggunakan router.

Dalam tulisan saya kali ini, saya ingin menunjukkan cara menghubungkan 3 buah komputer yang memiliki network yang berbeda, dengan menggunakan 2 buah router sebagai medianya. Untuk simulasinya saya menggunakan program dari Cisco, yaitu Cisco Packet Tracer V5.3.

Langkah pertama buat sebuah topologi jaringan seperti dibawah ini:

• Jaringan A : IP address = 1.1.1.2/8, Gateway = 1.1.1.1
• Jaringan B : IP address = 128.1.1.2/16, Gateway = 128.1.1.1
• Jaringan C : IP address = 192.1.1.2/24, Gateway = 192.1.1.1

Read more!

My Playlist (1)

Mau share lagi link-linj video yang asik buat didengar,,, 
Take a Look and Enjoy !! :)
1. Paramore (Monster)

2. Evanescence (My heart is Broken)

Read more!

Garis perjalanan distro Linux [PLoSoC]

[PLOSoC]: Garis perjalanan distro Linux: "LINUX" Sistem operasi fenomenal yang diperkenalkan pertama kali oleh pembuatnya Linuz Torvalds pada tahun 1991. Linux merupakan sistem ya...

Read more!

I've been watch in ,,,

Bagi-bagi video di youtube yang menurutku bagus, dan jika pembaca berminat silakan dilihat juga ya,,,!! :)

1. Artist : Prisa adinda, Song : Comfortable

2. Artist : Morning Star ( Prisa Adinda ), Song : Vulnerable (Secondhand Serenade)

Read more!

Struktur Data (Tugas 3)

Pascal : Program menghitung kombinasi bilangan

Pada tugas ini saya menggukan metode PROCEDURE, jika ingin menggunakan metode langsung yaitu memfaktorialkan tiap input bilangan tetap bisa digunakan, tapi akan lebih banyak menggunakan perulangan. Oleh karenanya lebih mudah menggunakan procedure, karena bisa digunakan berulang kali untuk tiap input angka yang ingin kita faktorialkan.

berikut listing programnya :

program kombinasi;
uses wincrt;

procedure fak (var f,hasil:real);
var i:integer;
begin
hasil:=1;i:=1;
while i <= f do
      begin
           hasil:=hasil*i;
           i:=i+1;
      end;
end;

var
   n,r,n_r,c,f1,f2,f3,k_hasil:real;

begin
     Write('Nilai N = ');readln(n);
     Write('Nilai R = ');readln(r);
     Writeln;
     n_r:=n-r;
     fak (n,f1);
     fak (n_r,f2);
     fak (r,f3);
     c:=f1/(f2*f3);
     Writeln(n:0:0,' Faktorial = ',f1:0:0);
     Writeln(n_r:0:0,' Faktorial = ',f2:0:0);
     Writeln(r:0:0,' Faktorial = ',f3:0:0);writeln;
     Writeln(n:0:0,' Kombinasi ',r:0:0,' = ',c:0:0);
end.

Jika dijalankan, tampilannya seperti gambar dibawah :

Read more!

Good and Bad - Be Your Self

Membincangkan masalah dengan temanku siang tadi. Orang kaya, orang pintar, cantik, bagus, dan banyak istilah lainnya. kenapa ada istilah seperti itu, kaya, pintar, cantik, dsb,, menurut pendapat awamku, itu karena keadilan dari Alloh dalam menciptakan dunia ini dan isinya. semua diciptakan dengan berpasangan, ada perbedaan diantaranya. ada kata-kata kaya karena ada orang miskin didunia ini. ada kata-kata pintar, itu karena ada orang yang tidak pintar atau belum pintar. ada kata-kata cantik, itu juga karena ada orang yang tidak cantik. dan seterusnya. Subhanallah... Maha suci Alloh dengan semua penciptaanNya di dunia ini. Semoga kita selalu dalam lindungan Alloh dan diberikan petunjuk agar tidak jauh dari jalanNya. Amin!!

Bicara antara baik dan buruk, dari apa yang selama ini saya pikirkan, itu semua tergantung dari masing-masing individu yang menjalani. tidak ada orang yang dilahirkan menjadi buruk, yang merubah orang itu menjadi buruk itu adalah proses hidup. orang baik itu juga bukan karena dari proses yang baik pula, terkadang orang baik itu karena dari orang yang buruk. banyak cerita yang menceritakan perubahan seorang yang bener-bener dari jalan yang tidak baik, jadi berubah menjadi orang baik-baik dan membantu sesama untuk keluar dari jalan yang tidak baik itu. Alloh mempunyai jalan untuk tiap umatnya, manusia hanya bisa berupaya, tapi semuanya sudah ditentukan. Bersyukurlah karena apa yang kita miliki saat ini, orang yang baik itu tidak hanya pandangan orang lain, nilai yang sesungguhnya ada pada hati masing-masing orang. Semoga kita jadi orang yang baik didunia sampai nanti di dunia yang kekal abadi. AMIN!

"Sebagai manusia biasa yang tidak lepas dari salah dan dosa, ingatkan jika ada ucapan saya yang salah"

Read more!

My World Is Full With You - Ten2Five

Dari judul tulisan ini saya bukan ingin menulis lirik lagunya Ten2Five, tapi tidak ada judul lain yang menurut saya tepat untuk tulisan saya kali ini. Prihatin melihat temanku yang ada masalah dengan pacarnya, dia curhat kalau dia selalu disakitin perasaannya sama pacarnya,tapi masih saja temanku ini tetap sayang sama dia, pertanyaanku "Kenapa kamu masih sayang sama dia?", dan temanku menjawab, dan ternyata jawabannya sesuai dengan keinginanku, apa jawabnya, "Karna aku udah sayang bgt sama cowokq...dan gak mungkin aq putus sama dia,,,", waww,, kata-kata temanku ini jawaban yang sederhana tapi jawaban yang dari hati. Memang rasa sayang tidak membutuhkan alasan, tidak ada alasan yang bener-bener tepat untuk mengungkapkan rasa sayang sama seseorang, karna rasa sayang itu yang membuat tidak bisa melupakan atau meninggalkan dia.

Dari cerita temanku ini saya bisa menanggapi, bahwa kalau hati sudah penuh maka tidak akan bisa diisi lagi. Hati yang penuh denga rasa kasih dan sayang, maka tidak akan bisa diisi atau digantikan dengan sayang yang lain. Ilmu alam lah ini saya pikir, ibaratkan hati itu seperti gelas dan sayang adalah airnya, jika gelas penuh sudah tidak bisa lagi diisi, kalu dipaksa pasti airnya

Read more!

Struktur Data (Tugas 2)

Tugas 2 :

Buat program untuk menampilkan rincian uang kembalian dari suatu pembelian!

Penyelesaian :

- Listing program pascal

Program rincian_uang_kembali;
uses wincrt;

var
uang,bayar,kembali : longint;

begin
  write('Jumlah Bayar : ');readln(bayar);
  write('Jumlah Uang : ');readln(uang);
  kembali:=uang-bayar;
  writeln('Total Kembali : ',kembali);
 
  if kembali div 100000 > 0 then begin
    writeln(kembali div 100000, ' lembar seratus ribuan');
    kembali := kembali mod 100000;
  end;

Read more!

Struktur Data (Tugas1)

Mata Kuliah : Struktur Data

Soal :

1. Buat program untuk perkalian 2 Matrix !

2. Buat Program untuk Menampilkan Matrix dibawah ini :

     0  0  0  0  1

     0  0  0  1  0

     0  0  1  0  0

     0  1  0  0  0

     1  0  0  0  0

Jawaban : (Listring program dan contoh hasil output program)

1. Listing program :

program matrik;
uses wincrt;
var
   A,B,C:ARRAY[1..10,1..10] of integer;
   X,Y,KOL,BAR:INTEGER;
begin
     WRITE('Jumlah Kolom=');READLN(KOL);
     WRITE('Jumlah Baris=');READLN(BAR);
     WRITELN;
WRITELN('Masukkan Matrik A');
for X:=1 to BAR do
begin
     for Y:=1 to KOL do
     begin
          write('[',X,':',Y,']=');Readln(A[X,Y]);
     end;
end;

Read more!

Butuh Inspirasi

Lama aku melihat layar monitor, mencoba untuk mencari sesuatu topik yang bisa saya gunakan untuk menulis di blog ini, tapi setelah sekian lama saya memandang tidak menemukan titik terang saya mau menulis apa. Jadi daripada gak ada kegiatan, nulis apa aja yg ada di pikiranku.

Menurut beberapa blog yang saya baca, untuk memulai menulis dalam suatu blog yang menjadi salah satu poinnya adalah tulis apapun yang ada dalam pikiranmu. Jadi saya mengikuti apa yang menjadi saran mereka, aku menulis apapun yang ada dalam pikiranku.

Memulai hari dengan segelas kopi, diminggu pagi yang cerah ini, masih ada saja beberapa kegiatan yang akan mengisi kegiatan di hari ini. Udah lah mau pulang dulu males nulis..

~sai~

Read more!

Dear Friends!!

Kawan,,

Saat kalian merasa bahwa kalian diacuhkan oleh seseorang, janganlah beranggapan bahwa acuhnya mereka semua dari kesalahanmu. Coba kita berpikir ke belakang, mengapa hal itu terjadi. Terkadang kita berpikir bahwa diacuhkan oleh seseorang membuat kita merasa tidak dibutuhkan oleh mereka, dan mereka tidak suka dengan kita, padahal pada dasarnya tidak ada orang yang tidak suka/butuh dengan kita, semua orang pasti memiliki waktu untuk merasa perlu dengan kita. Kalau dipikir lagi memang tidak nyaman rasanya kalau diacuhkan, hidup terasa tidak tenang, tidak ada orang yang peduli dengan kita.
Apalagi yang hubungannya dengan orang yang kita suka/sayangi, pastinya akan sangat menyiksa sekali kalau kita tidak diperhatikan, jangankan sehari,

Read more!

Confused again!!

What am i thingking>?


sekian lama gak pernah nulis, jadi bingung mau nulis apa, ya jadi sejalannya jari aja di keyboard lah, klo bisa dibaca ya syukur, klo gk bisa dibaca namanya juga bingung mau nulis apa, jadi maklum aja.


banyak sekali isi otak ini, mau pecah saja rasanya memikirkannya, jadi daripada gak ada pelampiasaan, mending dibuat kata2 aja di blog ini, itung2 nambah arsip di blog ini, abis lama gak pernah nulis lagi sih.


yah, untuk permulaan begini aja sudah, gak tahu mau nulis apalagi, udah buntu pikirannya. gak ada inspirasi, gak ada spirit mau nulis.

Read more!