Rabu, 11 Februari 2015

imkasma




Diposting oleh di Tidak ada komentar:

Forum Komunikasi Ikatan Mahasiswa Kabupaten Sekadau Di Malang




Diposting oleh di Tidak ada komentar:

Minggu, 25 Januari 2015

PENGELOLAAN INFRASTRUKTUR TEKNOLOGI PERPUSTAKAAN DI TELKOM UNIVERSITY BANDUNG PRAKTEK KERJA LAPANGAN I

PENGELOLAAN INFRASTRUKTUR TEKNOLOGI PERPUSTAKAAN DI TELKOM UNIVERSITY BANDUNG
PRAKTEK KERJA LAPANGAN I
UNIKAMA








Disusun Oleh:
120403020030
Novi Retno Wodowati S
120403020040
Eva Dwi Ratnaningtyas
120403020085
Sinta Kusuma Ayu
120403020044
Anggit Prasetyo
120403020046
Fandy Achmad A



PROGRAM STUDY SISTEM INFORMASI
FAKULTAS TEKNOLOGI INFORMASI
UNIVERSITAS KANJURUHAN MALANG
2014
LEMBAR PENGESAHAN
PRAKTEK KERJA LAPANGAN I

Diajukan kepada Teknologi Informasi Untuk Memenuhi Persyaratan dalam Menyelesaikan Program Praktek Kerja Lapangan I.
Nama Kegiatan                       : Praktek Kerja Lapangan I
Pokok Pembahasan                 : Pengelolaan Infrastruktur Teknologi Perpustakaan di Telkom University Bandung
Tempat                                    : Telkom University Bandung
Tanggal Pelaksanaan               : 5 Juni 2014
Tim Pelaksana                         : 1. Novi Retno Widowati      120403020030
                                                  2. Eva Dwi Ratnaningtyas    120403020040
3. Sinta Kusuma Ayu            120403020085           
                                                  4. Anggit Prasetyo                120403020044           
                                                  5. Fandy Achmad A.                        120403020046           
                                                 

Malang,           November  2014

                   Dekan                                                              Dosen Pembimbing
Fakultas Teknologi Informasi                                   Praktek Kerja Lapangan I


Yusriel Ardian,S.Kom.,M.Kom                                Syahminan,S.Kom.,M.Kom
KATA PENGANTAR

Puji syukur kami panjatkan kehadirat Tuhan Yang Maha Esa, karena limpahan rahmat, taufik, dan hidayah-Nya kami semua dapat menyelesaikan laporan Praktek Kerja Lapangan I dengan sedemikian rupa.
Tentunya, kami dalam menyelesaikan laporan ini karena bantuan dan dukungan dari banyak pihak. Ucapan terima kasih kepada pihak yang telah mendukung dan memberi bantuan, utamanya kepada :
1.      Bapak Prof.Dr. Pieters Sahertian, MBA.,MM selaku Rektor Universitas Kanjuruhan Malang.

2.      Bapak Yusriel Ardian, S.Kom.,M.Kom selaku Dekan Fakultas Teknologi Informasi Universitas Kanjuruhan Malang.

3.      Ibu Wiji Setiyaningsih,S.Kom,.M.Kom selaku Kaprodi Sistem Informasi.

4.      Bapak Syahminan,S.Kom.,M.Kom selaku Dosen Pembimbing.

Kami menyadari bahwa laporan ini masih jauh dari kesempurnaan. Untuk itu kami selalu mengharapkan kritik dan saran yang bersifat membangun agar kami lebih baik dalam menyusun laporan berikutnya. Semoga laporan ini dapat bermanfaat dan dapat menambah wawasan bagi berbagai pihak.



    Malang,   November  2014


                                                                                                     Penyusun


DAFTAR ISI

HALAMAN SAMPUL …………………………………………………………     i
LEMBAR PENGESAHAN …………………………………………………….     ii
KATA PENGANTAR ……………………………….…………………………     iii
DAFTAR ISI ………………………………….…………………………………    iv
DAFTAR GAMBAR ……………………………………………………………    vi
BAB I PENDAHULUAN
1.1  Latar Belakang …………………………………………………………….…    1
1.2  Tujuan Study Ekskursi ……………………………………………………….    2
1.3  Tempat dan Waktu Tujuan study ……………………………………………    2
BAB II LAPORAN HASIL WAWANCARA
2.1 Objek Wawancara ……………………………………………………………    3
2.2 Tempat dan Waktu Wawancara ……………………………………………...    3
2.3 Topik Pembicaraan …………………………………………...………………    3
2.3.1 Sejarah Perpustakaan Telkom ………………………………………………   3
2.3.2 Pengelolaan Infrastruktur Teknologi Perpustakaan Telkom University ……   5
2.3.3 Media Informasi yang Digunakan di Perpustakaan Telkom University ……   6
2.4       Kendala yang Dihadapi Selama Wawancara ………..……………………   7
BAB III DOKUMENTASI KEGIATAN
3.1 Objek Wawancara ……………………………………………………………    8
3.1.1 Riset laporan ……………………………………………………………….    8
3.1.2 Interview ……………………………………………...……………………    8
3.1.1 Observasi ……………………………………………………………….….    8
3.1.1 Dokumentasi ……………………………………………………………….    8
BAB IV PENUTUP
4.1              Kesimpulan ……………………………………………………………….   11
4.2              Saran ………………………………………..…………………………….   11
DAFTAR PUSTAKA …………………………………………………………….  12
DAFTAR GAMBAR

Gambar 3.1 Gedung Lerning Center Universitas Telkom Bandung ……………     9
Gambar 3.2 Recepsionist Universitas Telkom  …………………………………      9
Gambar 3.3 Seorang Mahasiswa Kanjuruhan Mengoperasikan Sebuah Komputer di Perpustakaan ……....…………………………………………………………….   10
Gambar 3.4 Ruang Koleksi Audiovisual Universitas Telkom ………………….      10



Diposting oleh di Tidak ada komentar:

Jumat, 05 Desember 2014

Kalkulator sederhana menggunakan Delphi 7

Program-program dasar untuk melatih penggunaan operator penghitungan untuk program Borland Delphi 7. Program delphi ini adalah sebuah kalkulator sederhana yang berisi penjumlahan, pengurangan, perkalian, dan pembagian untuk dua bilangan.

Komponen-komponen yang dibutuhkan untuk pembuatan program :
  1. 2 buah Tlabel
  2. 3 buah Tedit
  3. 4 buah Tbutton
Komponen dapat disusun seperti gambar berikut :
Untuk script hanya di masukkan ke dalam Tbutton :
  1. Klik dua kali button + dengan nama default button1. Dan akan muncul jendela baru dan berikan command/script seperti berikut. 
    2. Dan berikut source code untuk button1 untuk penjumlahan :
    
procedure TForm1.Button1Click(Sender: TObject);
var x,y,z : real;
begin
  x:=StrToFloat(Edit1.Text);
  y:=StrToFloat(Edit2.Text);
  z:=x+y;
  Edit3.Text:=FloatToStr(z);
end;
    Keterangan variabel x,y,z di deklarasikan sebagai variabel non-global. Dan digolongkan ke dalam type data real.
  2. Klik dua kali button - dengan nama default button2. Dan akan muncul jendela baru dan berikan command/script seperti berikut. Dan berikut source code untuk button2 untuk pengurangan :
    
procedure TForm1.Button2Click(Sender: TObject);
var x,y,z : real;
begin
  x:=StrToFloat(Edit1.Text);
  y:=StrToFloat(Edit2.Text);
  z:=x-y;
  Edit3.Text:=FloatToStr(z);
end;
  3. Klik dua kali button * dengan nama default button3. Dan akan muncul jendela baru dan berikan command/script seperti berikut. Dan berikut source code untuk button3 untuk perkalian :
    
procedure TForm1.Button3Click(Sender: TObject);
var x,y,z : real;
begin
  x:=StrToFloat(Edit1.Text);
  y:=StrToFloat(Edit2.Text);
  z:=x*y;
  Edit3.Text:=FloatToStr(z);
end;
  4. Klik dua kali button / dengan nama default button4. Dan akan muncul jendela baru dan berikan command/script seperti berikut. Dan berikut source code untuk button4 untuk pembagian :
    
procedure TForm1.Button4Click(Sender: TObject);
var x,y,z : real;
begin
  x:=StrToFloat(Edit1.Text);
  y:=StrToFloat(Edit2.Text);
  z:=x / y;
  Edit3.Text:=FloatToStr(z);
end;
Setelah itu klik toolbar->Run->Run(F9) atau pencet shortcut F9 untuk melakukan proses running program.
Diposting oleh di Tidak ada komentar:

PROGRAM BILING TIKET TOUR PARIWISATA

PROGRAM BILING TIKET TOUR PARIWISATA

Oke kawan kali ini saya akan postingkan sedikit hasil program yang saya buat dengan sederhana menggunakan Visual Delphi. Kesempatan ini saya membuat program tentang pembayaran tiket tour pariwisaa,- nah pertama kita perlu siapkan susu hagat,cemilan,dan musik yang kenceng hahaha :-).
nah kita lihat dulu tampilan form yang kita guakan..




nah, pertama siapkan beberapa pilihan dengan menggunakan radiobutton,-
kemudian sisipkan Edit1 - Edit8 secukupnya lah...
dan beberapa button untuk clear dan end untik mengakiri aplikasi dhelphi kita..

Nah.. langsung aja ke skripnya,-

sebelumnya kita deklarasikan beberapa variable yatu
jp : integer; //menyatakanJUMLAH PESERTA
bns: string; //menyatakan BONUS
jogja,bali,jakarta: string; //menyatakan TUJUAN
petama doble klik pada radiobutton dan masuk kedalam skrip program delphi

procedure TForm1.RadioButton1Click(Sender: TObject);
var jogja: string;
jp: integer;
begin
jp:=strtoint(edit1.Text);
if RadioButton1.checked= true then
  edit2.text:='jogja';
    edit3.Text:='100000';

sedikit penjelasan radio button disini saya bermaksud untuk memasukan data ke "TUJUAN","HARGA TIKET",dan "TOTAL BAYAR"
total bayar didapat dari "JUMLAH PESERTA" X "HARGA TIKET"
langsung saja + Skrip dibawahya edit3.text:='100000'

edit6.text:=floattostr(jp*100000);
end; 

dan hasilnya pun ika digabungkan menjadi spt berikut...

procedure TForm1.RadioButton1Click(Sender: TObject);
var jogja: string;
jp: integer;
begin
jp:=strtoint(edit1.Text);
if RadioButton1.checked= true then
  edit2.text:='jogja';
    edit3.Text:='100000';
edit6.text:=floattostr(jp*100000);
end;  

ingat julmlah peserta disini merupakan inputan sendiri...
kemudian masukan skrip yang sama tapi berbeda di harga dan tujuan pariwisata kita... 

caranya sama doble klik pada radiobuton2 masuk ke skripnya

procedure TForm1.RadioButton2Click(Sender: TObject);
var bali: string;
    jp:integer;
begin
jp:=strtoint(edit1.Text);
if RadioButton2.checked= true then
  edit2.text:='Bali';
    edit3.Text:='350000';
edit6.text:=floattostr(jp*350000);
end;

begitu juga dengan radiobutton3

procedure TForm1.RadioButton3Click(Sender: TObject);
var jakarta: string;
    jp:integer;
begin
jp:=strtoint(edit1.Text);
if RadioButton1.checked= true then
  edit2.text:='jakarta';
    edit3.Text:='250000';
edit6.text:=floattostr(jp*250000);
end;

kemudian kita tentukan untuk diterima atau ditolak, karena jika jumlah peserta pariwisata kurang dari 30 maka ditolak dan jika peserta pariwisata lebih dari 60 mendapatkan bonus dinner dan launch..
langsung ke skripnya yukk...
doble klick pada edit1"JULAH PESERTA"

procedure TForm1.Edit1Change(Sender: TObject);
var jp:real;
    k,bns:string;
begin
jp:=strtoint(edit1.Text);
begin
if jp<=30 then
  k:='tolak';
if jp>30 then
  k:='terima';
edit4.Text:=k;
      if jp<=60 then
      bns:='tidak melayani bonus';
      if jp>60 then
      bns:='mendapatkan bonus diner n launch';
      edit5.text:=bns;
end;
end;

setelah itu kita masuk ke button1"CLEAR"
isikan dari EDIT1-EDIT8

edit1.clear;

difungsikan unruk menghapus edit 1-8

Sekian dari saya sedikit ilmu dari saya,jika ada kekurangan saya minta ma'af dan koreksinya dari master2 karena saya juga masih newbe.. sampajumpa pada pertemuan selanjutnya... 
Diposting oleh di Tidak ada komentar:

Minggu, 23 Maret 2014

IP address dibagi menjadi 3 kelas A, Kelas B, dan Kelas C.

* Apa bisa dalam pemakai IP address 3 kelas (A, B, dan C) digubungkan?
Jika bisa bagaimana caranya?
Jika tidak mengapa?

Berikut ini cara cara untuk menjawab pertanyaan berikut……

Kelas A
IP address kelas A terdiri dari 8 bit untuk network ID dan sisanya 24 bit digunakan untuk host ID, sehingga IP address kelas A digunakan untuk jaringan dengan jumlah host yang sangat besar JJ. Pada bit pertama berikan angka

* Ø 0 sampai dengan 127. (0-127)

Karakteristik IP Kelas A
Format : 0NNNNNNN.HHHHHHHH.HHHHHHHH.HHHHHHHH
Bit Pertama : 0
NetworkID : 8 bit
HostID : 24 bit
Bit Pertama : 0 -127
Jumlah : 126 (untuk 0 dan 127 dicadangkan)
Range IP : 1.x.x.x – 126.x.x.x
Jumlah IP : 16.777.214
Misalnya IP address 120.31.45.18 maka
Network ID = 120
HostID = 31.45.18

* Ø Untuk Subnetmask =255.0.0.0
* Ø
Jadi IP address di atas mempunyai host dengan nomor 31.45.18 pada jaringan 120

Kelas B
IP address kelas B terdiri dari 16 bit untuk network ID dan sisanya 16 bit digunakan untuk host ID, sehingga IP address kelas B digunakan untuk jaringan dengan jumlah host yang tidak terlalu besar. Pada 2 bit pertama berikan angka 10, sehingga bit awal IP tersebut mulai dari (128 – 191).

Karakteristik IP Kelas B
Format : 10NNNNNN..NNNNNNNN.HHHHHHHH.HHHHHHHH
Bit Pertama : 10
NetworkID : 16 bit
HostID : 16 bit
Bit Pertama : 128 -191
Jumlah : 16.384
Range IP : 128.1.x.x – 191.155.x.x
Jumlah IP : 65.532
Misalnya IP address 150.70.45.18 maka
Network ID = 150.70
HostID = 60.56

* Ø Untuk Subnetmask =255.255.0.0
* Ø Jadi IP di atas mempunyai host dengan nomor 60.56 pada jaringan 150.70

Kelas C
IP address kelas C terdiri dari 24 bit untuk network ID dan sisanya 8 bit digunakan untuk host ID, sehingga IP address kelas C digunakan untuk jaringan untuk ukuran kecil. Kelas C biasanya digunakan untuk jaringan Local Area Network atau LAN. Biasanya ini terdapat dalam Warnet-Warnet maupun sebuah sekolah. Pada 3 bit pertama berikan angka 110 sehingga bit awal IP tersebut mulai dari (192 – 223).

Karakteristik IP Kelas C
Format : 110NNNNN.NNNNNNNN.NNNNNNNN.HHHHHHHH
Bit Pertama : 110
NetworkID : 24 bit
HostID : 8 bit
Bit Pertama : 192 – 223
Jumlah : 16.384
Range IP : 192.0.0.x.x – 223.255.255.x.x
Jumlah IP : 254 IP
Misalnya IP address 192.168.1.1 maka
Network ID = 192.168.1
HostID = 1

* Ø Untuk Subnetmask =255.255.255.0

Jadi IP di atas mempunyai host dengan nomor 1 pada jaringan 192.168.1. Semoga bermanfaatya - See more at: http://tianboyand.blogspot.com/2011/03/pembagian-ip-address-kelas-b-c.html#sthash.ntj1nLRR.dpuf
Diposting oleh di Tidak ada komentar:
Langganan: Postingan (Atom)