Tugas Latihan 2

Source Program Latihan 2:

IDENTIFICATION DIVISION.

PROGRAM-ID. LEVEL NUMBER.

DATA DIVISION.

ENVIRONMENT DIVISION.

WORKING-STORAGE-SECTION.

01 DATAINPUT.

02 NAMA PIC A(50)

02 GAJI.

03 GAJIPOKOK PIC 9(6).

03 TUNJANGAN PIC 9(6).

02 TOT-GAJI PIC 9(7).

02 TANYA PIC A.

88 LAGI VALUE IS 'Y','y'.

88 TIDAK VALUE IS 'T','t'.

SCREEN SECTION.

01 HAPUS-LAYAR.

02 BLANK SCREEN.

PROCEDURE DIVISION.

MULAI.

DISPLAY HAPUS-LAYAR.

DISPLAY (1,1) 'NAMA ANDA :'. ACCEPT NAMA.

DISPLAY (3,1) 'GAJI POKOK :Rp. '. ACCEPT GAJIPOKOK.

DISPLAY (5,1) 'BESARNYA TUNJANGAN:Rp. '. ACCEPT TUNJANGAN.

COMPUTE TOT-GAJI=GAJI-POKOK+TUNJANGAN.

DISPLAY HAPUS-LAYAR.

DISPLAY '==== GAJI ANDA UNTUK BULAN INI ===='.

DISPLAY SPACE.

DISPLAY (3,1) 'NAMA : ', NAMA.

DISPLAY (5,1) 'GAJI POKOK : Rp. ', GAJIPOKOK.

DISPLAY (7,1) 'GAJI TUNJANGAN : Rp. ', TUNJANGAN.

DISPLAY (9,1) 'TOTAL GAJI ANDA : Rp. ', TOT-GAJI.

DISPLAY SPACE.

DISPLAY (12,1) 'INPUT DATA LAGI? (Y/T): '. ACCEPT TANYA.

88 IF TANYA = 'Y' OR 'y' GO TO MULAI ELSE GO TO SELESAI.

SELESAI.

STOP RUN.

Program Running:

Penjelasan Logika Program:

1.Pada awal penulisan kode program diatas kita wajib menulis pada kolom 8:

IDENTIFICATION DIVISION.

PROGRAM-ID. LEVEL NUMBER.

DATA DIVISION.

ENVIRONMENT DIVISION.

WORKING-STORAGE-SECTION.

2. Fungsi kode WORKING-STORAGE-SECTION adalah pemesanan tempat pada internal memory pada program, contoh pada kode program diatas:

01 DATAINPUT.

……..

88 TIDAK VALUE IS 'T','t'

3. Pada program diatas terdapat level number:

Untuk level number 01: Untuk mengawali keterangan dari record

Untuk level number 02 sampai 49: Untuk mengawali keterangan dari data item

Untuk level number 88: Untuk mengawali suatu kondisi, contoh pada program diatas:

[88 IF TANYA = 'Y' OR 'y' GO TO MULAI ELSE GO TO SELESAI.]

4. Disini kita membuat sebuah data inputan dan nanti hasil output yang diinginkan terdapat NAMA, GAJI POKOK, BESAR TUNJANGAN dan TOTAL GAJI.

Untuk itu kita membuat sebuah variable yang dibutuhkan sebelum melakukan sebuah prosedur program atau proses program nantinya.

5. Misal pada variable berikut:

02 NAMA PIC A(50) à digunakan untuk variabel karakter/string

03 GAJIPOKOK PIC 9(6). à digunakan untuk variable numeric

88 LAGI VALUE IS 'Y','y'. à digunakan untuk variable string dan juga sebagai sebuah kondisi karena terdapat level number 88

6. SCREEN SECTION: untuk menunjukkan bentuk format dari layar terminal untuk menampilkan atau memasukkan data

7. BLANK SCREEN: digunakan untuk membersihkan layar dan menempatkan cursor pd posisi kiri atas ( baris1, kolom1 )

8. Pada prosedur diatas terdapat “COMPUTE” digunakan untuk perhitungan antara gaji pokok dan besar tunjangan dalam program

9. Jika program dijalankan ada statement kondisi dimana saat kita memilih tidak sesuai dengan variable yang tersedia pada program, maka program selesai jika memasukkan pilihan sesuai dengan variable yang tersedia program diulang kembali.

Statement tersebut terdapat pada:

“DISPLAY (12,1) 'INPUT DATA LAGI? (Y/T): '. ACCEPT TANYA.

88 IF TANYA = 'Y' OR 'y' GO TO MULAI ELSE GO TO SELESAI”

Read More

Tugas Latihan 1

Dibawah ini Source Kode Cobol Latihan 1:

IDENTIFICATION DIVISION.
AUTHOR. HERU_ZULKARNAIN.
ENVIRONMENT DIVISION.
DATA DIVISION.
01 NAMA PIC A(20).
01 KELAS PIC B(5).
PROCEDURE DIVISION.
MULAI.
DISPLAY (1,1) "NAMA : ". ACCEPT NAMA.
DISPLAY (3,1) "KELAS : ". ACCEPT KELAS.
SELESAI.
STOP RUN.

Saat Program dijalankan:

Read More

Search Engine Optimization

Search Engine Optimization disingkat SEO atau dalam Bahasa Indonesia disebut Optimisasi mesin pencari. Mesin pencari disini bertujuan menempatkan sebuah situs web pada posisi teratas, atau setidaknya halaman pertama hasil pencarian berdasarkan kata kunci tertentu yang ditargetkan. Sejarah singkatnya menurut Danny Sulivan SEO digunakan pada 26 juli 1997 oleh sebuah pesan spam yang dipostingka di Usenet namun pada masanya masih dapat mudah dimanipulasi.

Awal tentang algoritmanya dalam pencarian sepenuhnya tentang informasi oleh webmaster melalui meta tag pada kode html pada sebuah situs. Meta tag disini menyediakan informasi berdasarkan kata kunci biasa disebut keyword. Dalam perkembangannya algoritma berkembang menjadi PageRank. PageRank merupakan fungsi matematika yang kompleks berupa kombinasi antara perhitungan jumlah link yang mengarah pada suatu halaman web dengan analisis atas kualitas masing-masing link.

Sistem PageRank, walau menerapkan algoritma yang kompleks, belakangan juga tidak lagi sepenuhnya mampu menghadapi trik dan manipulasi. Sejumlah webmaster dan praktisi SEO telah mengembangkan beberapa metode yang memanfaatkan cara kerja PageRank agar halaman web klien mereka berada pada peringkat pertama hasil pencarian. Google secara resmi telah melarang penggunaan beberapa teknik ilegal seperti link farming, doorway pages, keyword stuffing, dan auto generated pages atau scraper pages. Contoh kasus Google Februari 2006 menghapus situs web perusahaan BMW dan Ricoh Jerman dari daftar karena terbukti menggunakan metode SEO yang manipulatif.

Adapun beberapa Tokoh SEO yang terkenal:

1. Danny Sullivan
Mantan wartawan LA Times yang mendirikan situs web Search Engine Watch yang aktif menyoroti perkembangan bisnis dan teknologi mesin pencari. Kini dia aktif menulis dan membuat reportase di Search Engine Land.

2. Matt Cutts
Programmer dan mantan pegawai NSA (National Security Agency) Amerika Serikat yang bergabung dengan Google pada tahun 2001 dan saat ini mengepalai tim penanggulangan spam Google. Selain menjadi karyawan Google, Matt Cutts adalah seorang blogger terkemuka. Artikel-artikel di blognya menjadi rujukan para praktisi SEO dari seluruh dunia, karena blognya sering menjadi sumber pertama setiap informasi mengenai perkembangan teknologi pencarian Google. Matt Cutts sering dianggap sebagai juru bicara tidak resmi Google.

3. Vannesa Fox
Mantan karyawati Google. Vannesa dikenal di kalangan webmaster sebagai konseptor dan programmer yang mengepalai proyek Google Webmaster Central.

Read More

Latihan Pascal

Latihan Kode Pascal:

uses crt;
label 10;
var
nama,npm,kelas:string;
a,b,c,p,l,t,m,n:integer;
K,V:real;
begin
10:
clrscr;
writeln;
writeln('UJIAN LAB PASCAL DASAR');
writeln;
writeln('MENU :');
writeln;
writeln('1.Biodataku');
writeln;
writeln('2.(-) Keliling Balok');
writeln;
writeln('3.(-) Volume Balok');
writeln;
writeln('4.(A) Deret');
writeln;
writeln('5.(B) Deret');
writeln;
writeln('6.Exit');
writeln;
write('Silahkan Memilih: ':25);
readln(c);
case c of
1:begin
clrscr;
writeln('BIODATA':15);
writeln;
write('NAMA',': ':5);readln(nama);
writeln;
write('KELAS',': ':4);readln(kelas);
writeln;
write('NPM',': ':6);readln(npm);
writeln;
writeln('NAMA SAYA',': ':5,nama);
writeln;
writeln('KELAS SAYA',': ':4,kelas);
writeln;
writeln('NPM SAYA',': ':6,npm);
readln;
goto 10;
end;
2:begin
clrscr;
writeln('KELILING BALOK');
writeln;
write('MASUKKAN PANJANG',': ':5);readln(p);
writeln;
write('MASUKKAN LEBAR',': ':7);readln(l);
writeln;
K:=2*(p+l);
write('KELILING BALOK','= ':7,K:5:2);
readln;
goto 10;
end;
3:begin
clrscr;
writeln('VOLUME BALOK');
writeln;
write('MASUKKAN PANJANG',': ':5);readln(p);
writeln;
write('MASUKKAN LEBAR',': ':7);readln(l);
writeln;
write('MASUKKAN TINGGI',': ':6);readln(t);
writeln;
V:=p*l*t;
write('VOLUME BALOK','= ':9,V:6:2);
readln;
goto 10;
end;
4:begin
clrscr;
for a:=1 to 3 do
begin
for b:=1 to a do
write(b);
writeln;
end;
for m:=3 downto 1 do
begin
for n:=1 to m-1 do
write(n);
writeln;
end;
readln;
goto 10;
end;
5:begin
clrscr;
for a:=3 downto 1 do
begin
for b:=1 to a do
write(b);
writeln;
end;
for m:=2 to 3 do
begin
for n:=1 to m do
write(n);
writeln;
end;
readln;
goto 10;
end;
6:end;
end.

Read More

GPEDIT.MSC

Pertama kalo yang dah ngerti komputer mungkin dah ga asing lagi kalo gw nulis tentang usil registry..

Nah buat iseng ja nih, mungkin bisa dibilang dah banyak tutorial di blog lain or situs forum or semacamnya, tapi disini gw cuma ngasih tw bagian penting kalo mau usil ma komputer sendiri BUKAN KOMPUTER TEMEN DITANGGUNG SENDIRI RESIKONYA.


Gw pake cara mudah tapi mematikan bisa juga menguntungkan bagi yang mengerti ntar kalo dah dipraktekin:

1. Gw mau usil nyembunyiin drive D gw, bisa dibilang gw punya data penting yang ga boleh orang tw..

2. Cara mudah gw:

a. Klik start lalu pilih Run

b. Isikan pada kolom Run --> gpedit.msc

c. Setelah muncul ikuti tanda pada gambar:


Gambar 1


Gambar 2

Pada gambar 2 lebih enak kalo pilih semua drive disembunyikan.

Note:"Metode ini tidak seperti regedit yang komputer mesti di restart dulu, teknik ini langsung bekerja saat gpedit.msc ditutup"

Jangan Jahat ke orang lain apalagi teman sendiri

Read More

Langkah Mudah Internet dengan Nokia

Beli pulsa internet di Tempat berjualan pulsa untung kan Rp 6000 bisa maen 4 jam.

Sebelum langkah penyetingan siapkan handphone dan kabel data wajib!!!

Untuk Dukungan PC Suite dapat dilihat di: Nokia Center PC Suite

Inilah langkah cepat dan singkat koneksi internet dengan modem Nokia:

1. Klik gambar yang diberi tanda merah:



2. Klik gambar seperti Kunci Inggris:



3. Lalu akan muncul tampilan seperti ini klik tanda panah untuk next:



4. Setting seperti dibawah ini, pertama mulai pasti server Australia, pilih yang manual seperti pada gambar dibawah Lalu next:


5. Isikan:

Title akses : indosatgprs
Nama Pengguna: indosat@durasi
Kode sandi : indosat@durasi

Gambar:


6. Finish lalu akan muncul kalo berhasil:

Read More

WARCRAFT III FROZEN THRONE (DOTA)

Setting di Bnetgatewayeditor.exe:

Bnet-editor versi lama:


Isi sesuai keterangan masing-masing form.


Versi lebih mudah yang Anda Download:


Hostname/Server: PvPGN Neo-MGi
IP/Address: pvpgn.mediagamer.biz
Zone : 7

Patch 1.24b
Download

Update Map Dota dan Map Hacknya
Update Site

Read More

Tugas Ars.Komputer 1

Intel Desktop Board DQ45CB

Saya akan memperkenalkan model contoh motherboard tipe DQ45CB dari Intel. Disini sekilas saya menjelaskan beberapa nama yang harus Anda kenal dalam motherboard agar kita dapat mengetahuinya, serta saya akan memberikan spesifikasi dari motherboard DQ45CB. Nah pertama saya akan memberikan spesifikasi dari motherboard ini:

1. Socket yang digunakan adalah model LGA775
2. Jenis processor yang support juga lumayan banyak diantaranya:

* Intel Core 2 Extreme

* Intel Core 2 Quad

* Intel Core 2 Duo

* Intel Pentium Dual-Core

* Intel Celeron Dual-Core

* Intel Celeren processor 400 Squence

3. Terdapat 2 chipset dikenal dengan sebutan Northbridge menggunakan Intel Q45 Express Chipset dan Southbridge Chipset menggunakan Intel ICH10DO

4. Support memory jenis DDR2 SDRAM unbuffered dan maksimum memorynya hingga mencapai 8Gb

5. Terdapat 2 port firewire

6. Sudah tersedia VGA dan Audio Onboard, untuk VGA Onboard diberi jenis Intel Graphics Media Accelerator X4500

7. Bios yang digunakan masih standard.

Untuk pengenalan tentang apa saja yang ada di dalam motherboard ini saya sudah menyertakan gambar diatas yang sudah saya beri nomor .

1. Tempat pemasangan prosesor, contoh prosesor intel core 2 duo
2. Chipset, model ini sudah integrated dengan bawaan intelnya.
3. Platform module 1.2, ini digunakan untuk melindungi data-data yang sensitive
4. Tempat memasang RAM DDR2
5. Tempat memasang VGA DDR2/PCI express 16x
6. Terdapat 5 buah port untuk serial ATA sebuah konektor dibelakang panel
7. Storage Intel Matrix
8. Tempat untuk sambungkan kabel telepon untuk network/internet
9. PCI konektor
10. Konektor 2 PCI express
11. Tempat USB 2.0
12. Biasanya selalu ada tiap motherboard jaman sekarang sudah tersedia audio onboard
13. Input/Output VGA model ini sudah cangging dual DVI ke VGA
14. Mikro ATX
15. Battery

Untuk lebih jelasnya dapat dilihat di halaman depan atau dapat dilihat dan didownload di situs ini: http://www.bhinneka.com/products/sku00508470/intel_dq45cb_b.aspx

Read More

Tugas Ars.Komputer 2

Untuk mengentahui Component yang terdapat pada computer banyak cara tapi ada cara yang mudah tanpa software untuk melihat perangkat pada computer saya:

1.Klik tombol start lalu pilih Run:

2. Kemudian di dalam Run ketikan dxdiag lalu tekan OK seperti dibawah ini:

3. Jika nanti ada tanda peringatan tekan saja Yes lalu akan muncul tampilan seperti ini (lihat pada bagian atas):

Pada umumnya ada 3 yang biasanya kita mesti memperhatikan yaitu System, Display dan Sound.

A. Untuk mengetahui system serta hardware yang digunakan pilih System:

B. Untuk mengetahui VGA kita sudah integrated dengan PC kita pilih Display:

C. Untuk mengetahui SoundCard yang digunakan serta driver yang digunakan pada PC kita pilih Sound:

Note: Untuk lebih detail dapat kita pilih untuk mengetahui keseluruhan informasi yaitu dengan cara memilih Save All Information:

Read More