Minggu, 22 April 2012

About subnetting

With Mr. Yuni
11 April 2012
1. IP : 130.223.24.2/23
a. Berapa Network Addressnya?
b. Berapa broadcast Addressnya
c. Ada di blok subnet keberapa IP di atas?
d. IP ke berapa dalam blok subnet tersebut?
2. IP : 192.168.15.135/25
a. Berapa Network Addressnya?
b. Berapa broadcast Addressnya
c. Ada di blok subnet keberapa IP di atas?
d. IP ke berapa dalam blok subnet tersebut?


Jawab:
1. a. 10000010.11011111.00011000.00000010
       11111111.11111111.11111110.00000000
========================================= AND
        10000010.11011111.00011000.00000000
130 223 24 0
    b.  10000010.11011111.00011000.00000010
        11111111.11111111.11111110.00000000
    =================================
    teap............................................|jadi binar 1 semua
        10000010.11011111.00011001.11111111
130 . 223    .      25 . 255
c.  jumlah blok subnet 128 ke 13
d. 2
2.a. 11000000.10101000.00001111.10000111
11111111.11111111.11111111.10000000
================================== AND
11000000.10101000.00001111.100000000
             192 .      168    .       15     .       128
   b. 11000000.10101000.00001111.11111111

      192 .       168 .        15   .       255
   c. 3
   d. 7

SOAL
1. Host address : 200.200.200.200/27
Pertanyaannya:
Ad di subnetwork ke berapa host ke berapa IP di atas?
2. Given the host address of 130.130.150.150/28
Find: a. Subnetwork
b. Broadcast Address
c. Subnet and host number to which the host belong!


Jawab
1. 11001000.11001000.11001000.11001000
11111111.11111111.11111111.11100000
========================================== And
11001000.11001000.11001000.11000000
     200 .       200   .       200  .      192

jumlah subnet=2pngkat3=8
blok subnet 256-224=32
0,32,64,96,128,160,192 ke 7 dan ke 200-192= 8

2. 10000010.10000010.10010110.10010110
11111111.11111111.11111111.11110000
================================== AND
100000010.1000010.10010110.10010000
  a. 130      .     130 .     150      .    144
  b. 130.130.150.159
  c. subnet dan host ke:
10000010.10000010.10010110.1001|0110
 11111111.11111111.11111111.1111|0000
Subnet ke                                          | host ke

subnet ke 2409+1=2410 host ke 6

Senin, 02 April 2012

Sorting Bubble Sort

Pada artikel kali ini, saya akan membarikan materi tentang sorting dengan metode bubble sort,
contoh yang menaik : data = 1 4 3 2
hasil = 1 2 3 4

sedangkan contoh yang menurun : data 1 4 3 2
hasil = 4 3 2 1

simple saja bukan :) lets check it out ..

program arh_bsort_menaik;

uses wincrt;

var i,n,j : integer;
a: array [1..100] of integer;

procedure buble;
var z: integer;
begin
for i:= 1 to n-1 do
begin
for j:= n downto i+1 do
begin
if a[j] < a[j-1] then
begin
z:= a[j];
a[j]:= a[j-1];
a[j-1]:=z;
end;
end;
end;

end;
begin
write('masukkan banyak larik (maks 100) : '); readln(n);
for i:= 1 to n do
begin write('A[',i,'] : '); readln(a[i]);
end;

buble;
write('data setelah diurutkan : ');

for j:=1 to n do
write (a[j],' ');
end.



Yang harus diperhatikan adalah koding
if a[j] < a[j-1] then
begin
z:= a[j];
a[j]:= a[j-1];
a[j-1]:=z;
end;
fungsi koding diatas adalah untuk menukarkan posisi dari angka yang ada pada larik. Jika nilai sekarang lebih kecil dari nilai sebelumnya maka tukar posisi array. Maksudnya serpti ini, misalnya kita punya data 1 4 3 ketika yang dicek array indeks ke 2 a[2]=4, akan dibandingkan nilainya dengan array indeks sebelumnya a[2-1]=1, apakah 4 < 1 ? kalau iya ditukar posisinya. Kalau tidak ya gak ditukar.
Selanjutnya pada array indeks ke 3 a[3]=3 dan a[3-1]=4. Apakah 3<4? Iya, barulah dijalankan proses pertukaran tempat/posisi array.

Konsepnya sama seprti algoritma tukar bejana. Dimana kita memiliki sebuah variabel temp yang bernama z.pertama nilai dari larik sekarang (yang ingin dipindahkan) a[i] akan diletakkan pada temp (z). kemudian nilai larik sekarang (a[i]) di isi dengan nilai sebelumnya a[i-1]. Lalu nilai dari a[i-1] di isi nilai z.
Contohnya : nilai a[i]= 4 a[i-1]=3. Maka tahapan pertukarannya adalah
z := 4; a[i]= 3; a[i-1]=4; selesai deh pertukaran dicek dan dilakukan terus sampai angka terurut semua.



Koding untuk bubble sort menurun

program arh_bsort_menurun;

uses wincrt;

var i,n,j : integer;
a: array [1..100] of integer;

procedure buble;
var z: integer;
begin
for i:= 1 to n-1 do
begin
for j:= n downto i+1 do
begin
if a[j] > a[j-1] then
begin
z:= a[j];
a[j]:= a[j-1];
a[j-1]:=z;
end;
end;
end;

end;
begin
write('masukkan banyak larik (maks 100) : '); readln(n);
for i:= 1 to n do
begin write('A[',i,'] : '); readln(a[i]);
end;

buble;
write('data setelah diurutkan : ');

for j:=1 to n do
write (a[j],' ');
end.


Kodingnya sama saja perbedaannya hanya pada tulisan yang berwarna merah.

Labels

Pengikut

 

© 2013 TKJ A' 15. All rights resevered. Designed by Templateism

Back To Top