Kamis, 25 Juni 2009

Graph/Graf

<html>
<head><title>Dijkstra Algoritma</title>
<script>


</script>
</head>
<body>
<script language = "javascript">

var NilaiAcuan = 10000;
var TakTerdefinisi = -1;
var NamaVerteks = new Array ('A','B','C','D','E','F');
var Matriks = new Array (6);

function Bobot (a,b)
{
return Matriks [a] [b]
}

function Dijkstra (JumlahVerteks,Awal,d)
{
var Posisi = new Array (JumlahVerteks);
var i;
var Kunjungan = new Array (JumlahVerteks);
var Sebelum = new Array (JumlahVerteks);

for (i=0; i<JumlahVerteks; i++)
{
Posisi [i] = NilaiAcuan;
Sebelum [i] = TakTerdefinisi;
Kunjungan[i] = false;
}
Posisi [Awal] = 0;

var Verteks;
for (Verteks =0; Verteks<JumlahVerteks; Verteks++)
{
var JarakTerpendek = NilaiAcuan, Berhenti = -1;
for (i=0; i<JumlahVerteks; i++)
{
if (!Kunjungan[i])
{
if (Posisi[i] <= JarakTerpendek)
{
JarakTerpendek = Posisi[i]; Berhenti = 1;
}
}
}
Kunjungan[Berhenti] = true;
for (i=0; i<JumlahVerteks; i++)
{
if (!Kunjungan[i])
{
var w = Bobot (Berhenti, i);
if (Posisi [Berhenti]+ w <Posisi[i])
{
Posisi[i] = Posisi[Berhenti] + w;
Sebelum [i] = Berhenti;
}
}
}
}

i=d;
if (Posisi [i] <NilaiAcuan)
{
var Lintasan = NamaVerteks [i];
var Verteks = i;
while (Verteks>0)
{
Verteks = Sebelum [Verteks];
if (Verteks>0) Lintasan = NamaVerteks[Verteks] + '->' + Lintasan;
{
message ("Jarak :" +Posisi[i]+' ('+Lintasan+')'+'<br>');
}
else
{
message ("Tidak ada Jalur");
}
}

function init () {
var X = NilaiAcuan;
Matriks [0] = new Array (0,2,3,X,x,x);
Matriks [1] = new Array (2,o,3,6,x,x);
Matriks [2] = new Array (3,3,0,3,5,x);
Matriks [3] = new Array (x,6,3,0,1,3);
Matriks [4] = new Array (x,x,5,1,0,1);
Matriks [5] = new Array (x,x,x,3,1,0);

var Awal='<pre>';
Awal = Awal + 'A--2-B-6--D--3-F'+'<br>'
Awal = Awal + ' \ | /| / '+'<br>'
Awal = Awal + ' 3 3 3 1 1 '+'<br>'
Awal = Awal + ' \ | / | / '+''<br>'
Awal = Awal + ' \|/ |/ '+'<br>'
Awal = Awal + ' C--5-E '+'<br>;
Awal = Awal +'</pre>'

message (Awal.replace (/(\d)+/g, '<font color="red">$1</font>'));
}
init ();
var Dari=0 // A;
var Ke =5 // F;
Dijkstra(Matriks.length,Dari,Ke);
//-->
</script>
</body>
</html>

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)

KODE KALENDER & JAM

<HTML>
<HEAD> <TITLE> KALENDER + JAM DIGITAL </TITLE> </HEAD>
<BODY>
<SCRIPT Language = "JavaScript">

</SCRIPT>
</BODY>
</HTML>

STRUKTUR DATA

Modul1. Latihan1

<HTML>
<HEAD>
<TITLE>Type Bilangan</TITLE>
</HEAD>
<BODY>
<SCRIPT LANGUAGE = "JavaScript">

</SCRIPT>
</BODY>
</HTML>

OUTPUTNYA :

Penambahan (15 + 14) = 29
Perkalian (15 x 14) = 210

Modul1.Latihan2

<HTML>
<HEAD>
<TITLE>Konversi Antar Sistem Bilangan</TITLE></HEAD>
<BODY>
<SCRIPT LANGUAGE = "JavaScript">

</SCRIPT>
</BODY>
</HTML>

Outputnya :

Bilangan Desimal; 25
Biner : 11001Oktal : 31Heksa : 19

Modul1,Latihan3.

<HTML>
<HEAD>
<TITLE>Membuat Fungsi Matematika Dengan JavaScript</TITLE>
</HEAD>
<SCRIPT LANGUAGE = "JavaScript">

</SCRIPT>
</BODY>
</HTML>

Outputnya :

30
Tipe Data nya adalah = number

MODUL2.LATIHAN2

<HTML>
<HEAD>
<TITLE>Belajar Array</TITLE>
</HEAD>
<BODY>
<SCRIPT LANGUAGE = "JavaScript">

</SCRIPT>
</BODY>
</HTML>

Outputnya :

SayaSedangBelajar

MODUL2.LATIHAN2
<HTML>
<HEAD>
<TITLE>Parameter Array </TITLE>
</HEAD>
<BODY>
<SCRIPT LANGUAGE = "JavaScript">

</SCRIPT>
</BODY>
</HTML>
Outputnya :
Elemen Array (1) =45
Elemen Array (2) =13
Elemen Array (3) =14
Elemen Array (4) =11
Elemen Array (5) =25
Elemen Array (6) =14
Elemen Array (7) =36
Elemen Array (8) =24
Elemen Array (9) =15
Elemen Array (10) =28
Elemen Array (11) =41
Elemen Array (12) =62

MODUL2.LATIHAN3

<em>Ampersands & angle brackets need to be encoded.</em><HTML>
<HEAD>
<SCRIPT>

</SCRIPT>
</HEAD>
<BODY>
</BODY>
</HTML>

Outputnya :

Fibonacci(0) = 0
Fibonacci(1) = 1
Fibonacci(2) = 1
Fibonacci(3) = 2
Fibonacci(4) = 3
Fibonacci(5) = 5
Fibonacci(6) = 8
Fibonacci(7) = 13
Fibonacci(8) = 21
Fibonacci(9) = 34
Fibonacci(10) = 55
Fibonacci(11) = 89
Fibonacci(12) = 144
Fibonacci(13) = 233
Fibonacci(14) = 377
Fibonacci(15) = 610
Fibonacci(16) = 987
Fibonacci(17) = 1597
Fibonacci(18) = 2584
Fibonacci(19) = 4181
Fibonacci(20) = 6765

MODUL 3.RECORD
Rekaman Record.

<html>
<head>
<title>Membuat Rekaman Objek</title>
</head>
<body bgcolor="lavender">
<script language = "JavaScript">

</script></body></html>

MOdul 3.Latihan 2.
Data Pegawai.

<html>
<head>
<title>Memanipulasi Data Pegawai</title>
<script language = "javascript" type="text/javascript">

</script>
</head>
<body onload ="inputPegawai();">
</body>
</html>

MODUL4 LATIHAN1.

<html>
<head>
<title>Contoh Implementasi Push dan POP pada Stack</title>
</head>
<body>
<script type="text/javascript">
var stack = new Array;
stack.push("A");
stack.push ("B");
stack.push ("C");
document.write ("stack : "+stack.toString () +"<br>");
var YangDiAmbil = stack.pop ();
document.write ("Data Yang Diambil : "+YangDiAmbil);
document.write("<br>");
document.write("Isi Stack Terakhir :"+stack.toString());
</script>
</body>
</html>
<html>
<head> <title>Struktur Fata stack</title>
<script language = "JavaScript">
var stack = new Array ();
function Input_ke_stack (data) {
stack.push (data);
}
function Ambil_dari_Stack () {
var data_dari_stack = stack.pop ();
if (data_dari_stack == underfined) return "Stack Sudah Kosong";
else return data_dari_stack;
}
function TampilkamStack(list) {
list.options.length = 0;
for (var i = 0; i < stack.length; i++) {
var data = new Option(stack[i]);
list.options[list.options.length] = data; }}
</script>
</head>
<body>
<form>
<input type=text name=textSimpan>
<input type=button value="Masukkan ke Stack" onClick='Input_ke_Stack(textSimpan.value); textSimpan.value=" "; TampilkanStack (mediaList); '>
<select name="mediaList" size=12>
<option>Tampilan data....
</select>
<input type=text name=textAmbil size=20>
<input type=button value="Ambil dari Stack" onClick="textAmbil.value = Ambil_dari_Stack(); TampilkanStack (mediaList); ">
</form>&
lt;/body>
</html>

Tugas Struktur Data (Persamaan Fungsi Kuadrat)

Program Persamaan Kuadrat dengan Function
<HTML>
<HEAD>
<TITLE> Menghitung Persamaan Kuadrat dengan Function </TITLE>
</HEAD>
<BODY>
<SCRIPT Language = "JavaScript">

</SCRIPT>
</BODY>
</HTML>

Graph/Graf

<html>
<head>
<title>Dijkstra Algoritma</title>
<script>

</script>
</head>
<body>
<script language = "javascript">
var NilaiAcuan = 10000;
var TakTerdefinisi = -1;
var NamaVerteks = new Array ('A','B','C','D','E','F');
var Matriks = new Array (6);
function Bobot (a,b)
{
return Matriks [a] [b]
}
function Dijkstra (JumlahVerteks,Awal,d)
{
var Posisi = new Array (JumlahVerteks);
var i;
var Kunjungan = new Array (JumlahVerteks);
var Sebelum = new Array (JumlahVerteks);
for (i=0; i<JumlahVerteks; i++)
{
Posisi [i] = NilaiAcuan;
Sebelum [i] = TakTerdefinisi;
Kunjungan[i] = false;
}
Posisi [Awal] = 0;
var Verteks;
for (Verteks =0; Verteks<JumlahVerteks; Verteks++){
var JarakTerpendek = NilaiAcuan, Berhenti = -1;
for (i=0; i<JumlahVerteks; i++)
{
if (!Kunjungan[i])
{
if (Posisi[i] <= JarakTerpendek){
JarakTerpendek = Posisi[i]; Berhenti = 1;
}
}
}
Kunjungan[Berhenti] = true;
for (i=0; i<JumlahVerteks; i++)
{
if (!Kunjungan[i])
{
var w = Bobot (Berhenti, i);
if (Posisi [Berhenti]+ w <Posisi[i])
{
Posisi[i] = Posisi[Berhenti] + w;
Sebelum [i] = Berhenti;
}
}
}
}
i=d;
if (Posisi [i] <NilaiAcuan){
var Lintasan = NamaVerteks [i];
var Verteks = i;
while (Verteks>0)
{
Verteks = Sebelum [Verteks];
if (Verteks>0) Lintasan = NamaVerteks[Verteks] + '->' + Lintasan;
{
message ("Jarak :" +Posisi[i]+' ('+Lintasan+')'+'<br>');
}else
{
message ("Tidak ada Jalur");
}
}
function init () {
var X = NilaiAcuan;
Matriks [0] = new Array (0,2,3,X,x,x);
Matriks [1] = new Array (2,o,3,6,x,x);
Matriks [2] = new Array (3,3,0,3,5,x);
Matriks [3] = new Array (x,6,3,0,1,3);
Matriks [4] = new Array (x,x,5,1,0,1);
Matriks [5] = new Array (x,x,x,3,1,0);
var Awal='<pre>';
Awal = Awal + 'A--2-B-6--D--3-F'+'<br>'
Awal = Awal + ' \ / / '+'<br>'
Awal = Awal + ' 3 3 3 1 1 '+'<br>'
Awal = Awal + ' \ / / '+''<br>'
Awal = Awal + ' \/ / '+'<br>'
Awal = Awal + ' C--5-E '+'<br>;
Awal = Awal +'</pre>'
message (Awal.replace (/(\d)+/g, '<font color="red">$1</font>'));
}
init ();
var Dari=0 // A;
var Ke =5 // F;
Dijkstra(Matriks.length,Dari,Ke);
//-->
</script>
</body>
</html>

asalmula pulau bali

Asal Mula Pulau Bali

Terbiasa hidup manja dan salah pergaulan sejak bocah, Manik Angkeran putra semata wayang resi Sidi Mantra, akhirnya tumbuh menjadi seorang pemuda yang gemar bermain judi, mabuk-mabukan dan main perempuan.

Imbasnya, Manik Angkeran terlibat hutang dimana-mana dalam jumlah besar. Bahkan suatu hari, Ki Wulung salah seorang partner bermain judi datang menagih dengan cara kekerasan ke kediaman Manik Angkeran disebuah padepokan.

Beruntung Sidi Mantra masih bisa mengatasi masalah yang menimpa putranya dan menyanggupi untuk melunasi hutang Manik Angkeran dalam waktu dekat. Sadar hutang Manik Angkeran sangat besar dan tak mungkin terbayar oleh seorang resi macam Sidi Mantra, sang resi pun nekad mendatangi Gunung Agung dimana Naga Besuki, dewa yang bersosok naga diam menetap.

Kepada siapa Sidi Mantra meminta bantuan. Yakni, sekantung koin-koin emas yang tak ternilai harganya. Akan tetapi, Manik Angkeran masih saja menyalah gunakan bantuan sang ayah untuk kembali berjudi serta bermain perempuan.

Hingga hutang pun semakin membengkak, bahkan jauh lebih parah dari sebelumnya. Keberuntungan masih berpihak pada Manik Angkeran. Seorang gadis cantik yang entah datang dari mana, membantu kesulitan yang dihadapi oleh Manik Angkeran. Namun, lagi-lagi bantuan sang gadis yang bernama Citra Lestari kembali disalah gunakan oleh Manik Angkeran.

Citra Lestari yang terlanjur jatuh hati pada Manik Angkeran, akhirnya membuka rahasia apa dan siapa dirinya, termasuk sang ayah, Naga Besuki. Setelah mengetahui jati diri Citra Lestari, Manik Angkeran kemudian nekad mendatangi bahkan pula berniat merampas harta karun yang dikuasai oleh Naga Besuki.

Bahkan saking tamak dan serakah, Manik Angkeran tega menebas ekor sang naga yang berhiaskan batu berlian. Namun, Naga Besuki tak membiarkan Manik Angkeran melenggang begitu saja.

Dengan kesaktian ilmu gaibnya, Naga Besuki melumpuhkan sang Durjana bahkan pula mengirim rohnya ke sebuah alam penyiksaan. Tak tahan menghadapi siksaan itu, Manik Angkeran jera lantas bertaubat untuk tidak kembali melakukan perbuatan nistanya.

Sidi Mantra yang terlanjur kecewa dengan perbuatan sang anak, akhirnya memutuskan untuk mengasingkan Manik Angkeran dibawah pengawasan Naga Besuki. Bahkan, membuat batas pemisah antara tempat sang ayah menetap dengan putranya. Yakni, sebuah selat yang mengelilingi sebuah pulau. Dan kini dikenal sebagai selat dan Pulau Dewata atau Pulau Bali

STRUKTUR DATA

StData Sort (Ascending)

<html><head>
<script LANGUAGE="JavaScript">
function Urutkan(form)
{
DataKosong = false;
DataInputan = form.Data.value;
inputData = DataInputan.split(",");
for (var i = 0; i < inputData.length; i++)
{
inputData[i] = parseInt(inputData[i], 10);
if (isNaN(inputData[i]))
{
DataKosong = true;
break;
}
}
inputData = bubbleSort(inputData, 0, inputData.length - 1);
if (DataKosong)
{
alert("Silakan Entri Dulu Data, Pisahkan dengan tanda Koma");
form.Data.focus();
}
else
form.Hasil.value = DataString(inputData, 0);
}
function DataString(ArrayData, Angka)
{
if((ArrayData.length - 1) >= Angka)
return (ArrayData[Angka] + "," + DataString(ArrayData,(Angka +1)));
else
return "";
}
function bubbleSort(ArrayData, Mulai, MulaiBaru)
{
for (var i = MulaiBaru - 1; i >= Mulai; i--)
{
for (var j = Mulai; j <= i; j++)
{
if (ArrayData[j+1] <ArrayData[j])
{
var DataTemporer = ArrayData[j];
ArrayData[j] = ArrayData[j+1];
ArrayData[j+1] = DataTemporer;
}
}
}
return ArrayData;
}
</script>
</head>
<body>
<center>
<form>
Masukan Deretan Angka, Pisahkan dengan Koma :
<hr>
<input type=text name=Data size=30 value="5,6,8,5,12,4,8,4,20">
<br>
<br>
<input type=button value="Urutkan" onClick="Urutkan(this.form)">
<br>
<br>
<br>
Hasil Pengurutan :
<hr>
<input type=text name=Hasil size=30>
</form>
</center>
</body>
</html>

stData (Sort Descending)

<html><head>
<script LANGUAGE="JavaScript"
>function Urutkan(form)
{
DataKosong = false;
DataInputan = form.Data.value;
inputData = DataInputan.split(",");
for (var i = 0; i < inputData.length; i++){
inputData[i] = parseInt(inputData[i], 10);
if (isNaN(inputData[i]))
{
DataKosong = true;
break;
}}
inputData = bubbleSort(inputData, 0, inputData.length - 1);
if (DataKosong)
{
alert("Silakan Entri Dulu Data, Pisahkan dengan tanda Koma");
form.Data.focus();
}
else
form.Hasil.value = DataString(inputData, 0);
}
function DataString(ArrayData, Angka)
{
if((ArrayData.length - 1) >= Angka)
return (ArrayData[Angka] + "," + DataString(ArrayData,(Angka +1)));
else
return "";
}
function bubbleSort(ArrayData, Mulai, MulaiBaru)
{
for (var i = MulaiBaru - 1; i >= Mulai; i--)
{
for (var j = Mulai; j <= i; j++)
{
if (ArrayData[j+1] > ArrayData[j])
{
var DataTemporer = ArrayData[j];
ArrayData[j] = ArrayData[j+1];
ArrayData[j+1] = DataTemporer;
}
}
}
return ArrayData;
}
</script>
</head>
<body>
<center>
<form>
Masukan Deretan Angka, Pisahkan dengan Koma :
<hr>
<input type=text name=Data size=30 value="5,6,8,5,12,4,8,4,20">
<br>
<br>
<input type=button value="Urutkan" onClick="Urutkan(this.form)">
<br>
<br>
<br>
Hasil Pengurutan :
<hr>
<input type=text name=Hasil size=30>
</form>
</center>
</body>
</html>

Struktur Data

Antrian :

<html>
<head>
<title>Struktur Data Queue</title>
<script language = "JavaScript">

var queue = new Array ();

function Masuk_Antrian(data) {
queue.unshift(data);
}

function Keluar_Antrian() {
var yang_keluar_antrian = queue.pop();
if (yang_keluar_antrian == 0)
return "Queue Sudah Kosong";
else
return yang_keluar_antrian;
}
function Dalam_Antrian(list) {
list.options.length = 0;
for (var i = 0; i < queue.length; i++) {
var data = new Option(queue[i]);
list.options[list.options.length] = data;
}

}
</script>
</head>
<body>
<form>
<input type=text name=textSimpan>
<input type=button value="Masuk Antrian"
onClick='Masuk_Antrian(textSimpan.value);
textSimpan.value="";
Dalam_Antrian(Visualisasi);'>

<select name="Visualisasi" size=12>
<option>Isi Antrian....
</select>
<input type=text name=textAmbil size20>
<input type=button value="Keluar Antrian"
onClick="textAmbil.value = Keluar_Antrian();
Dalam_Antrian(Visualisasi);">

</form>
</body>
</html>

Pengetahuan

welcome

welcome

Satya Sai Bhaba

hi

bali2

friends

girl

hello

water

foto

Kamis, 25 Juni 2009

Graph/Graf

Tidak ada komentar:

KODE KALENDER & JAM

STRUKTUR DATA

Output Record(Rekaman Record)

Tugas Struktur Data (Persamaan Fungsi Kuadrat)

Uotput Persamaan Fungsi Kuadrat

Graph/Graf

ft

jt

1

bali

KALENDER & JAM

TULUS

kdtn

ani

Arsip Blog

ptri

Mengenai Saya

asalmula pulau bali

Asal Mula Pulau Bali

dedex

gds

litle

friends

STRUKTUR DATA

stData (Sort Descending)

outputnya modul4latihan1.

Struktur Data

Output Antrian

SEPI

trjn