Belajar Bahasa Pemrograman: 2012

Senin, 02 April 2012

Membuat Web Sederhana

<html>
<body style="background-color:skyblue;">

<h1 align="center" style="font-family:algerian;color:black;background-color:white">WIRA COMPUTER</h1>

<marquee style="font-family:berlin sans fb">SELAMAT DATANG DI WEB KAMI</marquee>
KAMI MENJUAL PERALATAN KOMPUTER produk kami berupa:
PROCESSOR
MODHERBOARD
MEMORY
HARDISK

</body>
</html>

Pratikum HTML

<html>
<head>
<title>Program Files</title>
</head>
<body>
<h1> HOMEPAGE </h1> 

Homepage komersial adalah homepage yang berisikan informasi iklan, penawaran suatu produk, <del> jasa </del> atau <del> service </del> seperti e-commerce dan lain-lain 
Sementara homepage personal adalah homepage yang berisikan informasi-informasi pribadi, materi-materi hobi atau hanya sekedar link ke lokasi favorite
 Homepage pribadi bisa berisi beberapa informasi antara lain: 
hobi- aktifitas- keluarga-<del>artikel- </del> foto galery-puisi 
 atau kreatifitas lainnya yang menarik

</body>
</html>

Praktek Buat Biodata Diri

<html>
 <head>
 <title>Biodata</title>
 </head>
<body>
<hr>
BIODATA
<hr>
Nama:Fredina ELsie 
Alamat:Jl. Panji No.16 
Jenis Kelamin:perempuan
Hobby: denger lagu, tidur , nonton, <del>menari</del>

</body>
</html>

Memasukkan Gambar

Membuat Tulisan Berjalan Pada HTML

<html>
<body>

<marquee bgcolor="red" direction="right" behavior="alternate" scrollamount="50" width="500" loop="5">Tulisan disini akan berjalan</marquee>

</body>
</html>

COBA

PERHATIKAN !

<html>
<body style="background-color:PowderBlue;">

<h1>Look! Styles and colors</h1>


This text is in Verdana and red and right


This text is in Times and white and background blue

This text is 30 pixels high

</body>
</html>

Sabtu, 04 Februari 2012

Membuat Tulisan Berjalan Pada Pascal

uses crt;

var

x,y:byte;

begin

clrscr;

x:=1;

y:=5;

repeat

delay(200);

gotoxy(x-1,y);write(' ');

gotoxy(x,y);write('maju');

x:=x+1;

until(x>25);

x:=25;

y:=10;

repeat

delay(200);

gotoxy(x+15,y);write(' ');

gotoxy(x,y);write('mundur');

x:=x-1;

until(x=1);

x:=1;

y:=12;

repeat

delay(200);

gotoxy(x,y-1);write(' ');

gotoxy(x,y);write('bawah');

y:=y+1;

until(y>25);

x:=20;

y:=25;

repeat

delay(200);

gotoxy(x,y+1);write(' ');

gotoxy(x,y);write('atas');

y:=y-1;

until(y<11);

readln;

end.

Program Pascal

Ketentuan soal :
1. Kualitas Barang di masukkan
Kualitas Harga Per Kg
A/a 1000
B/b 750
C/c 500

Uses crt;
Var
Berat,harga,hargaperkg:integer;
Kualitas:char;
Begin
Clrscr;
Write(‘ Massukkan Kualitas Buah [A/B/C] : ‘); readln(kualitas);
Write(‘ Berapa Kg berat yang di beli : ‘ ); readln(berat);
Case kualitas of
‘A’,’a’: hargaperkg:=1000;
‘B’,’b’: hargaperkg:=750;
‘C’,’c’: hargaperkg:=500;
Else
Begin
Hargaperkg:=0;
Writeln(‘Salah Input’);
End;
End;

Harga:=hargaperkg*berat;
Writeln(‘ Harga Per Kg : Rp.’,hargaperkg);
Writeln(‘ Harga Total : Rp.’,harga);
End.

Contoh Program Pascal If Perhitungan Gaji
Diposkan oleh rizky is naruto lovers komentar (0)

Uses crt;
Var nama:string[20];jabatan:string;
Gaji:longint;
Tunj,ppn,gajibersih:real;
Begin
Clrscr;
Write(‘Nama Karyawan : ‘); readln(nama);
Write(‘Masukkan Jabatan : ‘); readln(jabatan);
If (jabatan=’Direktur’) or (jabatan=’direktur’) then
Begin
Gaji:=3000000;
Tunj:=0.1* gaji;
End
Else If (jabatan=’Manager’) or (jabatan=’manager’) then
Begin
Gaji:=2000000;
Tunj:=0.05* gaji;
End
Else If (jabatan=’Karyawan’) or (jabatan=’karyawan’) then
Begin
Gaji:=1000000;
Tunj:=0.1* gaji;
End
Else
Begin
Gaji:=800000;
Tunj:=0.1* gaji;
End;
Writeln(‘Gaji Bersih : Rp.‘,gaji);
Writeln(‘Tunjangan Jabatan : Rp.‘,tunj:9:2);
Ppn:=0.1*gaji;
Writeln(‘PPN 10 % : Rp.‘,ppn:9:2);
Total:=(gaji+total)-ppn;
Writeln(‘Total Gaji : Rp.‘,total:9:2);
Readln;
End.

Program Penghitung Luas segitiga

uses crt;
var
alas,tinggi:integer;
procedure hitung_luas(a,t:integer);
var
luas:real;
begin
clrscr;
luas:=a*t/2;
writeln('Luas segitiga =',luas);
end;
begin
writeln('Masukkan alas =');readln(alas);
writeln('Masukkan tinggi =');readln(tinggi);
hitung_luas(alas,tinggi);
readln;
end.

Membuat File txt Melalui Pascal
Diposkan oleh rizky is naruto lovers komentar (0)

uses crt;
var
Tulisan:text;
a,b:byte;
c:byte;
begin
clrscr;
writeln('Masukkan Angka 1 =');readln(a);
writeln('Masukkan Angka 2 =');readln(b);
c:=a+b;
writeln('Jadi nilainya adalah =',c);
assign(Tulisan,'hitung.txt');
rewrite(Tulisan);
write(tulisan,a);
write(Tulisan,'+');
write(Tulisan,b);
write(Tulisan,'=');
write(Tulisan,c);
Close(Tulisan);
readln;
end.

Program Pencari Biaya Dan Grade

uses crt;
var
nilai:byte;
begin
clrscr;
Write('masukkan Nilai anda =');Readln(nilai);

if nilai>0 then
begin
Writeln('GRADE = O ');
Writeln('Besar biaya = Rp.550000');
end
else

if nilai<=1 then begin Writeln('GRADE = E '); Writeln('Besar biaya = Rp.450000'); end else if nilai<=40 then begin Writeln('GRADE = D'); Writeln('Besar biaya = Rp.350000'); end else if nilai<=60 then begin Writeln('GRADE = C'); Writeln('Besar biaya = Rp.250000'); end Else if nilai<=70 then begin Writeln('GRADE = B'); Writeln('Besar biaya = Rp.150000'); end else begin If nilai >=100 then
Writeln('GRADE = A');
Writeln('Besar biaya = Rp.50000');
end;
readln;
end.

Program Pencari Predikat

USES CRT;
VAR
nilai:byte;
A,B,C,D:string;
begin
clrscr;
write ('masukkan nilai=');readln(nilai);
if nilai< 69 then
writeln('predikat D');
if nilai<79then
writeln ('predikat C');
if nilai<90 then
writeln ('predikat B');
if nilai<101 then
writeln('predikat A');
readln;
end.

Konversi bilangan Desimal Ke Biner

USES CRT;
VAR Des:integer;
Bin:string;
begin
clrscr;
writeln('PROGRAM KONVERSI MENGUBAH BILANGAN DECIMAL KE BINER');
write('Masukkan bilangan Decimal=');
readln(Des);
Bin:=’’;
repeat
begin

{menghitung biner dari hasil bagi}

If Des mod 2=0 then Bin:='0'+Bin
else Bin:='1'+Bin;

{membagi bulat bilangan desimal}

Des:= Des div 2;
end;
Until Des=0;
Writeln('Bilangan Biner =',Bin);
readln;

Kalkulator Sederhana

#include<stdio.h>
#include<conio.h>
void menu();
void jumlah();
void kurang();
void kali();
void bagi();
void main()
{
char chrPilihan;
do
{
menu();
fflush(stdin);
scanf(“%c”,chrPilihan);
if ((chrPilihan == ‘x’)||(chrPilihan == ‘x’))
{ printf(“Thanks for use this program… egie_ku@yahoo.com”);
break;}
switch (chrPilihan)
{ case ’1′:
jumlah();
break;
case ’2′:
kurang();
break;
case ’3′:
kali();
break;
case ’4′:
bagi();
break;
default:
printf(“\nSorry bro.. Kode yang di imput salah…\n”);
}
}
while(chrPilihan != ‘x’);
}
void menu()
{
printf(” \n”);
printf(“Main Menu\n”);
printf(“==================\n”);
printf(“1. Operasi Penjumlahan\n”);
printf(“2. Operasi Pengurangan\n”);
printf(“3. Operasi Perkalian\n”);
printf(“4. Operasi Pembagian\n”);
printf(“x. Untuk Keluar\n”);
printf(” \n”);
printf(“Input kode masukkan,bro!!: “);
}
void jumlah()
{
int jumlah,bil1,bil2;
printf(“Bilangan 1 nya apa?? “);
scanf(“%d”,bil1);
printf(“Bilangan kedua?? “);
scanf(“%d”,bil2);
jumlah=bil1+bil2;
printf(“Hasilnya tambahannya %d\n”,jumlah);
printf(“\nPencet Enter buat lanjut..\n”);
getch();
}
void kurang()
{
int jumlah,bil1,bil2;
printf(“Bilangan 1 nya apa?? “);
scanf(“%d”,bil1);
printf(“Bilangan kedua?? “);
scanf(“%d”,bil2);
jumlah=bil1-bil2;
printf(“Hasilnya kurangannya %d\n”,jumlah);
printf(“\nPencet Enter buat lanjut..\n”);
getch();
}
void kali()
{
int jumlah,bil1,bil2;
printf(“Bilangan 1 nya apa?? “);
scanf(“%d”,bil1);
printf(“Bilangan kedua?? “);
scanf(“%d”,bil2);
jumlah=bil1*bil2;
printf(“Hasilnya kalinya %d\n”,jumlah);
printf(“\nPencet Enter buat lanjut..\n”);
getch();
}
void bagi()
{
int jumlah,bil1,bil2;
printf(“Bilangan 1 nya apa?? “);
scanf(“%d”,bil1);
printf(“Bilangan kedua?? “);
scanf(“%d”,bil2);
jumlah=bil1/bil2;
printf(“Hasilnya baginya %d\n”,jumlah);
printf(“\nPencet Enter buat lanjut..\n”);
getch();
}

Jumat, 03 Februari 2012

Program Kasir (Pascal)

Program Kasir;
uses wincrt;
var nama_barang : array[1..20] of string;
harga : array[1..20] of real;
banyak : array[1..20] of byte;
kata,grs :string;
x,y,i,j :byte;
Jum_Harga,Total_Harga,disc,Total_Bayar,uang :real;
begin
clrscr;
grs:='===============================================================';
kata:='Program Kasir';
x:=round((78-length(kata))/2);
gotoxy(x,2);writeln(kata);
x:=round((78-length(grs))/2);
gotoxy(x,3);write(grs);
{-----------------------------}
gotoxy(x,4);write('Data Belanja');
gotoxy(x,5);write(grs);
gotoxy(x,6);writeln('| No | Nama Barang | Harga Satuan |
Banyak | Jumlah Harga |');
gotoxy(x,7);write(grs);
{--------------------------------------------------------------------}
i:=0;
Total_Harga:=0;
repeat
i:=i+1;
gotoxy(x,7+i);write('| ',i);
gotoxy(x+5,7+i);write('|');
gotoxy(x+7,7+i);readln(Nama_barang[i]);
if Nama_Barang[i] <>'' then begin
gotoxy(x+25,7+i);write('|');
gotoxy(x+28,7+i);readln(Harga[i]);
gotoxy(x+28,7+i);writeln(Harga[i]:10:2);
gotoxy(x+41,7+i);write('|');
gotoxy(x+44,7+i);readln(Banyak[i]);
gotoxy(x+50,7+i);write('|');
Jum_Harga:=Harga[i]*Banyak[i];
gotoxy(x+53,7+i);writeln(Jum_Harga:10:2);
gotoxy(x+65,7+i);writeln('|');
Total_Harga:=Total_Harga+Jum_Harga ; end;
until nama_barang[i]='';
{--------------------------------------------------------------------}
disc:=0;
if (Total_Harga > 10000) and (Total_Harga <100000) then
disc:=0.05 * Total_Harga
else
if (Total_Harga >= 100000 ) then
disc:=0.1 *Total_Harga;
{--------------------------------------------------------------------}
kata:='Faktur Penjualan';
y:=round((78-length(kata))/2);
gotoxy(y,2);writeln(kata);
j:=i-1;
gotoxy(x,8+j);write(grs);
gotoxy(x,8+j+1);write('Total Belanja :');
gotoxy(x+53,8+j+1);write(Total_Harga:10:2);
gotoxy(x,8+j+2);write('Discount :');
gotoxy(x+53,8+j+2);write(disc:10:2);
gotoxy(x,8+j+3);write(grs);
gotoxy(x,8+j+4);write('Total Bayar setelah discount :');
Total_Bayar:=Total_Harga-disc;
gotoxy(x+53,8+j+4);write(Total_Bayar:10:2);
gotoxy(x,8+j+5);write('Uang diBayar');
gotoxy(x+53,8+j+5);readln(Uang);
gotoxy(x+53,8+j+5);writeln(Uang:10:2);
gotoxy(x,8+j+6);Write(grs);
gotoxy(x,8+j+7);write('Uang Kembali');
gotoxy(x+53,8+j+7);write(Uang-Total_Bayar:10:2);
end.

Kamis, 02 Februari 2012

Contoh Penggunaan Perulangan For..Do..

Berikut ini adalah sebagian contoh perulangan dengan penerapan statemen For.. Do..

Uses crt;

const

akhir = 4;

var

baris,kolom : integer;

begin

for baris := akhir downto 1 do

begin

for kolom := baris downto 1 do

write(kolom);

writeln;

end;

end.

Hasil : 4321 321 21 1

Uses crt;

const

akhir = 4;

var

baris,kolom : integer;

begin

for baris := akhir downto 1 do

begin

for kolom := 1 to baris do

write(kolom);

writeln;

end;

end.

Hasil : 1234 123 12 1

Uses crt;

const

akhir = 4;

var

baris,kolom : integer;

begin

for baris := 1 to akhir do

begin

for kolom := 1 to baris do

write(baris);

writeln;

end;

end.

Hasil : 1 22 333 4444

Uses crt;

const

akhir = 4;

var

baris,kolom : integer;

begin

for baris := akhir downto 1 do

begin

for kolom := baris downto 1 do

write(baris);

writeln;

end;

end.

Hasil : 4444 333 22 1

Uses crt;

const

akhir = 3;

var

baris,kolom : integer;

begin

for baris := akhir downto 1 do

begin

for kolom := baris downto 1 do

write(baris,'  ',kolom);

writeln;

end;

end.

Hasil : 3 33 23 1 2 22 1 1 1

Uses crt;

var baris,kolom,jumbaris :integer;

begin

write ('Jumlah Baris  : ');readln(jumbaris);

FOR BARIS:=1 TO jumbaris do

begin

write ('*': jumbaris baris);

FOR kolom := 2 TO  (2 *baris -1 ) do

begin

write('*');

end;

writeln;

end;

end.

Hasil : (baris = 4) * *** ***** *******

Dasar-dasar HTML

Tag Dasar HTML :

HTML : Memulai dan mengakhiri dokumen HTML

Bentuk Umum :

<html>

Dokumen html

</html>

HEAD : Memulai dan mengakhiri bagian header

Bentuk Umum :

<head> header </header>

TITLE : Memulai dan mengakhiri bagian judul

Bentuk umum :

<title> Judul dokumen </title>

BODY : Menandai dan mengakhiri bagian isi dokumen

Bentuk umum :

<body>

Isi Dokumen

</body>

Skema Dasar HTML :

<HTML>

<HEAD>

<TITLE> Judul dokumen </TITLE>

</HEAD>

<BODY>

Isi Dokumen

</BODY>

</HTML>

Daftar Tag :

<html> : Menandakan dokumen HTML

<head> : Bagian Header/Kop/Kepala

<title> : Bagian Judul dokumen

<body> : Bagian isi dokumen

<h1> : Bagian Judul Paragraf (H1, H2, H3, …, Hn)

: Bagian Paragraf

: Bold (huruf tebal)

: Italic (huruf miring)

: Underline (bergaris bawah)

: Superscript

: Subscript

: Huruf

<li> : Penomoran/ bullet

<hr> : Garis horizontal (mendatar)

<img> : Menyisipkan gambar

<a> : Link

<table> : Tabel

<!– –> : Komentar

Menghitung Faktorial (Pascal)

program Faktorial;

uses wincrt;

procedure faktorial (var fak, hasil : integer);

   var

      i:integer;

begin

hasil := 1;

for i := 2 to fak do

hasil := Hasil * i;

End;

Var

   N,Hasil_fak:integer;

   Begin

     Write ('Nilai yang akan difaktorialkan  =  '); Readln (N);

     Faktorial (N,Hasil_Fak); Writeln;

     Writeln ('Hasil Faktorial  =  ',Hasil_fak);

End.

Kalkulator Pascal

Program Calculator;

uses wincrt;

const

Kol = 10; kol2=35;

Var

Bil1,Bil2,Bil3,Pilih : Integer;

procedure masukkan;

begin

clrscr;

gotoxy(kol2,4);writeln('----------------------');

gotoxy(kol2,5);writeln('   Masukan Bilangan   ');

gotoxy(kol2,6);writeln('----------------------');

gotoxy(kol2,7);writeln('Bilangan 1 : ');

gotoxy(kol2,8);writeln('Bilangan 2 : ');

gotoxy(kol2,9);writeln('----------------------');

gotoxy(kol2,10);writeln('Hasil Operasi : ');

gotoxy(kol2,11);writeln('----------------------');

gotoxy(kol2+20,7);readln(bil1);

gotoxy(kol2+20,8);readln(bil2);

end;

Procedure Tambah;

begin

masukkan;

bil3 := bil1 + bil2;

gotoxy(kol2+20,10);writeln(bil1,'+',bil2,'=',bil3);

readln;

end;

Procedure Kurang;

begin

masukkan;

bil3 := bil1 - bil2;

gotoxy(kol2+20,10);writeln(bil1,'-',bil2,'=',bil3);

readln;

end;

Procedure Kali;

begin

masukkan;

bil3 := bil1 * bil2;

gotoxy(kol2+20,10);writeln(bil1,'*',bil2,'=',bil3);

readln;

end;

Procedure bagi_bulat;

begin

masukkan;

bil3 := bil1 div bil2;

gotoxy(kol2+20,10);writeln(bil1,'div',bil2,'=',bil3);

readln;

end;

Procedure Sisa_bagi;

begin

masukkan;

bil3 := bil1 mod bil2;

gotoxy(kol2+20,10);writeln(bil1,'mod',bil2,'=',bil3);

readln;

end;

(* Program Utama *)

begin

repeat

clrscr;

gotoxy(kol,4);  writeln('--------------------------');

gotoxy(kol,5); writeln('Operasi Bilangan Bulat');

gotoxy(kol,6); writeln('--------------------------');

gotoxy(kol,7); writeln('1. Penambahan');

gotoxy(kol,8);  writeln('2. Pengurangan');

gotoxy(kol,9);  writeln('3. Perkalian');

gotoxy(kol,10);writeln('4. Pembagian Integer {Div} ');

gotoxy(kol,11); writeln('5. Sisa Hasil Bagi {Mod} ');

gotoxy(kol,12); writeln('6. Selesai');

gotoxy(kol,13); writeln('--------------------------');

gotoxy(kol,14); writeln('Pilihan Anda [1..6] : [   ] ');

gotoxy(kol,15);writeln('--------------------------');

gotoxy (kol+25,14);readln(pilih);

case pilih of

1 : Tambah;

2 : Kurang;

3 : Kali;

4 : Bagi_bulat;

5 : Sisa_bagi;

end;

until pilih = 6;

end.

Program Matrik Dengan Pascal

Program ini sangat sederhana, namun susah dimengerti. Nah, langsung aja praktekkan dan pahami!

program matrik;
uses wincrt;
type data = array[1..5,1..5] of integer;
var
matrikI,matrikII : data;
baris,kolom,pil : integer;

procedure isi;
var i,j :integer;
begin
writeln(‘Penentuan ORDO MATRIK I’);
write(‘Masukan banyak baris matrik I : ‘);readln(baris);
write(‘Masukan banyak kolom matrik I : ‘);readln(kolom);
for i:=1 to baris do
for j:=1 to kolom do
begin gotoxy(j*10,i*5);
readln(matrikI[i,j]);
end;
clrscr;
writeln(‘Penentuan ORDO MATRIK II’);
write(‘Masukan banyak baris matrik II : ‘);
readln(baris);
write(‘Masukan banyak kolom matrik II : ‘);
readln(kolom);
for i:=1 to baris do
for j:=1 to kolom do
begin gotoxy(j*10,i*5);
readln(matrikII[i,j]);
end;
end;
procedure jumlah(a1,a2 : data);
var
hasil:data;
i,j:integer;
begin
for i:=1 to baris do
for j:=1 to kolom do
begin
hasil[i,j]:=a1[i,j]+a2[i,j];
end;
clrscr;
writeln(‘Hasil Penjumlahan’);
for i:=1 to baris do
for j:=1 to kolom do
begin gotoxy(j*10,i*5);
write(hasil[i,j]);
end;
end;
procedure kurang(a1,a2 : data);
var
hasil: data;
i,j: integer;
begin
for i:=1 to baris do
for j:=1 to kolom do
begin
hasil[i,j]:=a1[i,j]-a2[i,j];
end;
clrscr;
writeln(‘Hasil Pengurangan’);
for i:=1 to baris do
for j:=1 to kolom do
begin gotoxy(j*10,i*5);
write(hasil[i,j]);
end;
end;
procedure kali(a1,a2 : data);
var
hasil:data;
i,j,z:integer;
begin
for i:=1 to baris do
for j:=1 to kolom do
begin
hasil[i,j]:=0;
for z:=1 to baris do
hasil[i,j]:=hasil[i,j]+matrikI[i,z]*matrikII[z,j];
end;
clrscr;
writeln(‘Hasil perkalian’);
for i:=1 to baris do
for j:=1 to kolom do
begin gotoxy(j*10,i*5);
write(hasil[i,j]);
end;
end;
begin
writeln(‘MENU’);
writeln(‘(1) Penjumlahan Matrik’);
writeln(‘(2) Pengurangan Matrik’);
writeln(‘(3) Perkalian Matrik’);
write(‘Pilihan = ‘);
readln(pil);
clrscr;
case pil of
1 :begin
isi;
jumlah(matrikI,matrikII);
end;
2:begin
isi;
kurang(matrikI,matrikII);
end;
3:begin
isi;
kali(matrikI,matrikII);
end;
end;
end.

Fungsi FOR dalam Perulangan (Looping)

1. Pola Segitiga Memanjang Ke Bawah

Program Segitiga;
Uses crt;
Var
Baris,
Kolom : Integer;
Begin
Clrscr;
For Baris:=1 To 10 Do
Begin
For Kolom:=1 To Baris Do
End;
Readln;
End.

Pada Struktur Program ini, hasil outputnya :
1
12
123
1234
12345

Struktur program For lainnya :

Program Segitiga;
Uses crt;
Var
Baris,
Kolom : Integer;
Begin
Clrscr;
For Baris:=1 to 10 do
Begin
For Kolom:=Baris to 10 do
Write (Kolom);
Writeln;
End;
Readln;
End.

Akan menghasilkan Pola :
12345678910
2345678910
345678910
45678910
5678910
678910
78910
8910
910
10

Contoh Web Sederhana

Berikut contoh web sederhana yang saya buat

<html>
 <head>
 <title>Selamat Datang di Web Saya</title>
 </head>
 <body>
 Biodata saya
 <ul>
 <li>Nama : Fredina Elsie</li>
 <li>Alamat : Jl. Panji Gang Melati No.16, Kwanji, Dalung</li>
 <li>Jenis Kelamin: Perempuan</li>
 </ul>
 </body>

</html>

Rabu, 01 Februari 2012

Contoh HTML dasar

Kode HTML dasar yang digunakan untuk membuat sebuah halaman website adalah sebagai berikut:

<html>

<head>

<title>

ini adalah contoh title

</title>

</head>

<body>

ini adalah body html. body html adalah

tempat bersemayamnya segala tulisan,

gambar, dan informasi yang dibaca

oleh semua orang di internet.

secara umum, jika kita ingin menulis

apapun di situs kita, kita perlu

memasukkan tulisan tersebut

pada area body ini.

</body>

</html>

Selasa, 31 Januari 2012

”Nama Domain” Negara-negara di Dunia

1. .ac Ascension Island

2. .ad Andorra

3. .ae United Arab Emirates

4. .af Afghanistan

5. .ag Antigua and Barbuda

6. .ai Anguilla

7. .al Albania

8. .am Armenia

9. .an Netherlands Antilles

10. .ao Angola

11. .aq Antarctica

12. .ar Argentina

13. .as American Samoa

14. .at Austria

15. .au Australia

16. .aw Aruba

17. .ax Åland

18. .az Azerbaijan

19. .ba Bosnia and Herzegovina

20. .bb Barbados

21. .bd Bangladesh

22. .be Belgium

23. .bf Burkina Faso

24. .bg Bulgaria

25. .bh Bahrain

26. .bi Burundi

27. .bj Benin

28. .bm Bermuda

29. .bn Brunei Darussalam

30. .bo Bolivia

31. .br Brazil

32. .bs Bahamas

33. .bt Bhutan

34. .bv Bouvet Island

35. .bw Botswana

36. .by Belarus

37. .bz Belize

38. .ca Canada

39. .cc Cocos (Keeling) Islands

40. .cd Democratic Republic of the Congo tadinya Zaire

41. .cf Central African Republic

42. .cg Republic of the Congo

43. .ch Switzerland

44. .ci Côte d’Ivoire

45. .ck Cook Islands

46. .cl Chile

47. .cm Cameroon

48. .cn hanya untuk China Daratan: Hong Kong dan Macau menggunakan TLD berbeda.

49. .co Colombia

50. .cr Costa Rica

51. .cu Cuba

52. .cv Cape Verde

53. .cx Christmas Island

54. .cy Cyprus

55. .cz Czech Republic

56. .de Germany (Deutschland)

57. .dj Djibouti

58. .dk Denmark

59. .dm Dominica

60. .do Dominican Republic

61. .dz Algeria (Dzayer)

62. .ec Ecuador

63. .ee Estonia

64. .eg Egypt

65. .er Eritrea

66. .es Spain (España)

67. .et Ethiopia

68. .eu European Union

69. .fi Finland

70. .fj Fiji

71. .fk Falkland Islands

72. .fm Federated States of Micronesia

73. .fo Faroe Islands

74. .fr France

75. .ga Gabon

76. .gb United Kingdom jarang digunakan; primary ccTLD yang sering digunakan ialah .uk untuk United Kingdom

77. .gd Grenada

78. .ge Georgia

79. .gf French Guiana

80. .gg Guernsey

81. .gh Ghana

82. .gi Gibraltar

83. .gl Greenland

84. .gm The Gambia

85. .gn Guinea

86. .gp Guadeloupe

87. .gq Equatorial Guinea

88. .gr Greece

89. .gs South Georgia and the South Sandwich Islands

90. .gt Guatemala

91. .gu Guam

92. .gw Guinea-Bissau

93. .gy Guyana

94. .hk Hong Kong Special administrative region dari People’s Republic of China.

95. .hm Heard Island and McDonald Islands

96. .hn Honduras

97. .hr Croatia (Hrvatska)

98. .ht Haiti

99. .hu Hungary

100. .id Indonesia

101. .ie Ireland (Éire)

102. .il Israel

103. .im Isle of Man

104. .in India

105. .io British Indian Ocean Territory

106. .iq Iraq

107. .ir Iran

108. .is Iceland (Ísland)

109. .it Italy

110. .je Jersey

111. .jm Jamaica

112. .jo Jordan

113. .jp Japan

114. .ke Kenya

115. .kg Kyrgyzstan

116. .kh Cambodia (Khmer)

117. .ki Kiribati

118. .km Comoros

119. .kn Saint Kitts and Nevis

120. .kp North Korea

121. .kr South Korea

122. .kw Kuwait

123. .ky Cayman Islands

124. .kz Kazakhstan

125. .la Laos kini dipasarkan sebagai domain official untuk Los Angeles.

126. .lb Lebanon

127. .lc Saint Lucia

128. .li Liechtenstein

129. .lk Sri Lanka

130. .lr Liberia

131. .ls Lesotho

132. .lt Lithuania

133. .lu Luxembourg

134. .lv Latvia

135. .ly Libya

136. .ma Morocco

137. .mc Monaco

138. .md Moldova

139. .me Montenegro

140. .mg Madagascar

141. .mh Marshall Islands

142. .mk Republic of Macedonia

143. .ml Mali

144. .mm Myanmar

145. .mn Mongolia

146. .mo Macau Special administrative region dari People’s Republic of China.

147. .mp Northern Mariana Islands

148. .mq Martinique

149. .mr Mauritania

150. .ms Montserrat

151. .mt Malta

152. .mu Mauritius

153. .mv Maldives

154. .mw Malawi

155. .mx Mexico

156. .my Malaysia

157. .mz Mozambique

158. .na Namibia

159. .nc New Caledonia

160. .ne Niger

161. .nf Norfolk Island

162. .ng Nigeria

163. .ni Nicaragua

164. .nl Netherlands

165. .no Norway

166. .np Nepal

167. .nr Nauru

168. .nu Niue Biasa digunakan untuk website-website Scandinavian dan Dutch, karena dalam bahasa mereka ‘nu’ berarti ‘now’.

169. .nz New Zealand

170. .om Oman

171. .pa Panama

172. .pe Peru

173. .pf French Polynesia dengan Clipperton Island

174. .pg Papua New Guinea

175. .ph Philippines

176. .pk Pakistan

177. .pl Poland

178. .pm Saint-Pierre and Miquelon

179. .pn Pitcairn Islands

180. .pr Puerto Rico

181. .ps Palestinian territories di bawah kontrol PA yang meliputi Tepi Barat (West Bank) dan Jalur Gaza (Gaza Strip)

182. .pt Portugal

183. .pw Palau

184. .py Paraguay

185. .qa Qatar

186. .re Réunion

187. .ro Romania

188. .rs Serbia

189. .ru Russia

190. .rw Rwanda

191. .sa Saudi Arabia

192. .sb Solomon Islands

193. .sc Seychelles

194. .sd Sudan

195. .se Sweden

196. .sg Singapore

197. .sh Saint Helena

198. .si Slovenia

199. .sj Svalbard dan Jan Mayen

200. .sk Slovakia

201. .sl Sierra Leone

202. .sm San Marino

203. .sn Senegal

204. .so Somalia

205. .sr Suriname

206. .st São Tomé and Príncipe

207. .su tadinya Soviet Union

208. .sv El Salvador

209. .sy Syria

210. .sz Swaziland

211. .tc Turks and Caicos Islands

212. .td Chad

213. .tf French Southern and Antarctic Lands

214. .tg Togo

215. .th Thailand

216. .tj Tajikistan

217. .tk Tokelau

218. .tl East Timor

219. .tm Turkmenistan

220. .tn Tunisia

221. .to Tonga

222. .tp East Timor

223. .tr Turkey

224. .tt Trinidad and Tobago

225. .tv Tuvalu nama domain yang banyak digunakan oleh stasiun televisi.

226. .tw Taiwan, Republic of China

227. .tz Tanzania

228. .ua Ukraine

229. .ug Uganda

230. .uk United Kingdom

231. .um United States Minor Outlying Islands

232. .us United States of America Biasa digunakan oleh U.S. State dan local governments daripada TLD .gov

233. .uy Uruguay

234. .uz Uzbekistan

235. .va Vatican City State

236. .vc Saint Vincent and the Grenadines

237. .ve Venezuela

238. .vg British Virgin Islands

239. .vi U.S. Virgin Islands

240. .vn Vietnam

241. .vu Vanuatu

242. .wf Wallis and Futuna

243. .ws Samoa tadinya Western Samoa

244. .ye Yemen

245. .yt Mayotte

246. .yu Yugoslavia Kini digunakan untuk Serbia dan Montenegro

247. .za South Africa (Zuid-Afrika)

248. .zm Zambia

249. .zw Zimbabwe