Berbagi Ilmu itu Bijaksana

Pemograman Kriptografi

noreply@blogger.com (Anonymous) — Fri, 17 Jan 2014 13:23:00 +0000

Listing Program

Form Menu

Public Class Menu

    Private Sub ClloseToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ClloseToolStripMenuItem.Click
        End
    End Sub

    Private Sub KriptografiCaesarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KriptografiCaesarToolStripMenuItem.Click
        Kriptografi_Caesar.Show()
    End Sub

    Private Sub KriptografiVernamToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KriptografiVernamToolStripMenuItem.Click
        Kriptografi_Vernam_Chiper.Show()
    End Sub

    Private Sub KriptografiGronsfeldToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KriptografiGronsfeldToolStripMenuItem.Click
        Kriptografi_Gronsfeld.Show()
    End Sub

    Private Sub KriptografiViginereToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KriptografiViginereToolStripMenuItem.Click
        Kriptografi_Viginere.Show()
    End Sub
End Class

Form Kriptografi Caesar

Public Class Kriptografi_Caesar

    Private Sub btnenkripsi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnenkripsi.Click
        Dim x As String = ""
        Dim xkalimat As String = ""
        For i = 1 To Len(plainteks.Text)
            x = Mid(plainteks.Text, i, i)
            x = Chr(Asc(x) + 3)
            xkalimat = xkalimat + x
        Next
        Chiperteks.Text = xkalimat
    End Sub

    Private Sub btndekripsi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndekripsi.Click
        Dim x As String = ""
        Dim xkalimat As String = ""
        For i = 1 To Len(plainteks.Text)
            x = Mid(plainteks.Text, i, i)
            x = Chr(Asc(x) - 3)
            xkalimat = xkalimat + x
        Next
        Chiperteks.Text = xkalimat
    End Sub

    Private Sub Kriptografi_Caesar_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class

Form Kriptografi Vernam

Public Class Kriptografi_Vernam_Chiper

    Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        plainteks.Text = ""
        kunci.Text = ""
        chiperteks.Text = ""
    End Sub

    Private Sub btnenkripsi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnenkripsi.Click
        Dim j As Integer
        Dim jum As Integer
        Dim sKey As String
        Dim nKata As Integer
        Dim nKunci As Integer
        Dim sKata As String
        Dim sPlain As String = ""
        Dim nEnc As Integer
        j = 0
        sKata = plainteks.Text
        jum = Len(sKata)
        sKey = kunci.Text
        For i = 1 To jum
            If j = Len(sKey) Then
                j = 1
            Else
                j = j + 1
            End If
            nKata = Asc(Mid(sKata, i, 1)) - 65

            nKunci = Asc(Mid(sKey, j, 1)) - 65

            nEnc = ((nKata + nKunci) Mod 26)
            sPlain = sPlain & Chr((nEnc) + 65)
        Next i
        chiperteks.Text = sPlain
    End Sub

    Private Sub plainteks_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles plainteks.KeyPress
        e.KeyChar = UCase(e.KeyChar)
        Dim tombol As Integer = Asc(e.KeyChar)
        If Not ((tombol >= 65) And ((tombol <= 90)) Or (tombol = 8)) Then
            e.Handled = True
        End If
    End Sub

    Private Sub plainteks_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles plainteks.TextChanged

    End Sub

    Private Sub kunci_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles kunci.KeyPress
        e.KeyChar = UCase(e.KeyChar)
        Dim tombol As Integer = Asc(e.KeyChar)
        If Not ((tombol >= 65) And ((tombol <= 90)) Or (tombol = 8)) Then
            e.Handled = True
        End If
    End Sub

    Private Sub kunci_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kunci.TextChanged

    End Sub
End Class

Form Kriptografi Gronsfeld

Public Class Kriptografi_Gronsfeld

    Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        plainteks.Text = ""
        kunci.Text = ""
        chiperteks.Text = ""

    End Sub

    Private Sub plainteks_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles plainteks.KeyPress
        If ((e.KeyChar >= "0" And e.KeyChar <= "9") And e.KeyChar <> vbBack) Then e.Handled = True
    End Sub

    Private Sub kunci_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles kunci.KeyPress
        If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled = True
    End Sub

    Private Sub Btnenkripsi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnenkripsi.Click
        Dim j As Integer
        Dim jum As Integer
        Dim sKey As String
        Dim nKata As Integer
        Dim nKunci As Integer
        Dim sKata As String
        Dim sPlain As String = ""
        Dim nEnc As Integer
        j = 0
        sKata = plainteks.Text
        jum = Len(sKata)
        sKey = kunci.Text
        For i = 1 To jum
            If j = Len(sKey) Then
                j = 1
            Else
                j = j + 1
            End If
            nKata = Asc(Mid(sKata, i, 1)) - 65

            nKunci = Asc(Mid(sKey, j, 1)) - 48

            nEnc = ((nKata + nKunci) Mod 26)
            sPlain = sPlain & Chr((nEnc) + 65)
        Next i
        chiperteks.Text = sPlain
    End Sub
End Class

Form Kriptografi Viginere

Public Class Kriptografi_Viginere

    Private Sub btnProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnProses.Click
        Chipertext.Text = Enkripsi(Plaintext.Text, Kunci.Text)
    End Sub

    Function Enkripsi(ByVal Teks As String, ByVal Kunci As String) As String
        Dim j As Integer
        Dim jum As Integer
        Dim sKey As String
        Dim nKata As Integer
        Dim nKunci As Integer
        Dim sKata As String
        Dim sPlain As String
        Dim nEnc As Integer
        j = 0
        jum = Len(Teks)
        sPlain = ""
        sKey = Kunci
        sKata = Teks
        For i = 1 To jum
            If j = Len(sKey) Then
                j = 1
            Else
                j = j + 1
            End If
            nKata = Asc(Mid(sKata, i, 1))

            nKunci = Asc(Mid(sKey, j, 1))

            nEnc = ((nKata + nKunci) Mod 256)

            sPlain = sPlain & Chr((nEnc))
        Next i
        Enkripsi = sPlain
    End Function

    Private Sub Kriptografi_Viginere_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class

Hasil Printout

Belajar Pemrograman di Mesran[dot]Net Part II

noreply@blogger.com (Anonymous) — Mon, 06 Jan 2014 19:29:00 +0000

Setelah menjadi artikel top yang paling banyak di view pada Belajar Pemrograman di tahun lalu, kini saya akan kembali menampilkan part II nya dengan judul yang berbeda dengan tambahan sedikit bahasa inggris( memakai kata Part II), gaul kan, ya), walau tidak akan terlalu banyak tambahan tutur kata yang terketik disini. Anda yang ingin mengenal pemilik mesran[dot] dapat melihat disini .kalau tidak ya sudah, tidak masalah.

Kembali pada topik pembicaraan utama,

Media pembelajaran yang baik, saat ini sulit sekali didapat. Kita mahasiswa pasti tentu memilliki pengalaman berbeda antara cara mengajar guru di Sekolah, dengan cara mengajar dosen. 70% kita mahasiswa aktif di kampus, berbeda dengan yang sudah-sudah 70% Guru kita menyuapi kita dengan ilmu nya.

Saran saya dari dulu hendaknya, dalam mengambil sistem belajar jangan menggunakan Satuan SKS(Sistem Kebut Semalam) karena orang sakit jiwa saja belum tentu jiwa nya tenang apalagi kita,.

Kita sebagai mahluk ciptaan tertinggi ada baiknya dapat menggunakan waktu kita lebih bijak lagi, media pembelajaran online merupakan cara terbaik bagi kita yang ingin menambah wawasan selain membaca buku-buku setebal brankas besi yang ada pada Perpustakaan milik kampus anda masing2. Karena Topik kita pada kali ini membahas pemrograman, maka Mesran[dot] inilah saran saya, kepada saudara/i ku yang ingin lulus cita-citanya menjadi seorang Programmer. Kenapa tidak? karena didalamya kita dapat menjumpai Pembelajaran VB.net, Pemograman C/C++, Pascal dan masih banyak lagi yang lainnya.

Tenang saja Mesran[dot]Net menyajikan kualitas KW("iki opo?"), tidak akan membuat anda loading lama(Lola) dalam Pemrograman, sebaliknya anda akan memiliki akses kecepatan pemahaman berpikir melebihi ukuran berpikir kapasaitas Ghz layaknya processor core i8("Lebay mang dah keluar core i8").

Bagi anda yang ingin mengaktifkan fitur Login Member, syaratnya cukup mudah, anda jika anda akan segera tamat, buruan daftarkan diri anda pada Staff admin lalu meregistrasikan diri anda disini. nah untuk anda2 yang juga sama seperti saya, duduk di bangku perkuliahan, buruan urus surat transferan nya(" hehheh tidak dipaksa").

Yah seperti yang saya ujarkan di kata sambutan sebelumnya, tidak banyak ulasan yang akan saya berikan disini, lengkapnya anda dapat melihat di artikel saya yang sebelumnya( cek disini ) .

"Belajar itu bukan hanya sekedar buku ataupun penjelasan2 dari pengajar, semua kehidupan ini adalah pembelajaran tinggal anda sendiri yang menentukannya, apakah ingin diteliti(mana tw gila) atau meneliti " .

akhir kata, saya Erixon Andrianus pamit mohon undur diri dari hadapan anda.

Salam Programming..

Program Pembayaran Tagihan Rekening Listrik

noreply@blogger.com (Anonymous) — Sun, 08 Dec 2013 09:36:00 +0000

Public Class Form_Pembayaran_Rekening_Listrik

    Private Sub Form_Pembayaran_Rekening_Listrik_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        kode.Items.Add("TOK-MED-001")
        kode.Items.Add("RUM-BEL-002")
        kode.Items.Add("SWA-TEM-003")
        kode.Items.Add("PAB-MAR-004")
        kode.Items.Add("TOK-BIN-005")
        kode.Items.Add("TOK-PAK-006")
        Rancangan_Table()
        Biaya_Beban.ReadOnly = True
        HargaperKwh.ReadOnly = True
        Total_Tagihan.ReadOnly = True
        besar_Pemakaian.ReadOnly = True
        Pajak.ReadOnly = True
        pEMBAYARAN.ReadOnly = True
    End Sub

    Private Sub kode_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kode.SelectedIndexChanged
        Dim x As String
        x = Microsoft.VisualBasic.Right(kode.Text, 3)
        Select Case x
            Case "001"
                nama.Text = "ERIXON A S"
                no.Text = x
            Case "002"
                nama.Text = "RINALDI PRATAMA"
                no.Text = x
            Case "003"
                nama.Text = "ABDUL RAHMAD"
                no.Text = x
            Case "004"
                nama.Text = "SUHENDRIK"
                no.Text = x
            Case "005"
                nama.Text = "ROHIMAN"
                no.Text = x
            Case "006"
                nama.Text = "ARIFIN S P"
                no.Text = x
        End Select
        x = Microsoft.VisualBasic.Left(kode.Text, 3)
        Select Case x
            Case "PAB"
                HargaperKwh.Text = 10000
                Biaya_Beban.Text = 1000000
                tipe.Text = "PABRIK"
            Case "RUM"
                HargaperKwh.Text = 200
                Biaya_Beban.Text = 50000
                tipe.Text = "RUMAH"
            Case "SWA"
                HargaperKwh.Text = 1500
                Biaya_Beban.Text = 400000
                tipe.Text = "SWALAYAN"
            Case "TOK"
                HargaperKwh.Text = 500
                Biaya_Beban.Text = 150000
                tipe.Text = "TOKO"
        End Select
        x = Microsoft.VisualBasic.Mid(kode.Text, 5, 3)
        Select Case x
            Case "MED" : daerah.Text = "MEDAN"
            Case "BEL" : daerah.Text = "BELAWAN"
            Case "TEM" : daerah.Text = "AKSARA"
            Case "MAR" : daerah.Text = "MARENDAL"
            Case "BIN" : daerah.Text = "BINJAI"
            Case "PAK" : daerah.Text = "LUBUK PAKAM"
        End Select
    End Sub
    Sub Rancangan_Table()
        With lv
            .Columns.Add("Kode Pelanggan", 100, HorizontalAlignment.Center)
            .Columns.Add("Nama Pelanggan", 100, HorizontalAlignment.Left)
            .Columns.Add("No Urut", 100, HorizontalAlignment.Left)
            .Columns.Add("Tipe", 100, HorizontalAlignment.Left)
            .Columns.Add("Daerah", 100, HorizontalAlignment.Left)
            .Columns.Add("Meter Bulan Lalu", 100, HorizontalAlignment.Left)
            .Columns.Add("Meter Bulan Ini", 100, HorizontalAlignment.Left)
            .Columns.Add("Besar Pemakaian", 100, HorizontalAlignment.Left)
            .Columns.Add("Biaya Beban", 100, HorizontalAlignment.Left)
            .Columns.Add("Harga Per KWH", 100, HorizontalAlignment.Left)
            .Columns.Add("Total Tagihan", 100, HorizontalAlignment.Left)
            .Columns.Add("Pajak", 100, HorizontalAlignment.Left)
            .Columns.Add("Pembayaran", 100, HorizontalAlignment.Left)
            .GridLines = True
            .FullRowSelect = True
            .View = View.Details
        End With
    End Sub
    Sub isi_table()
        Dim lst As New ListViewItem
        With lst
            .Text = kode.Text
            .SubItems.Add(nama.Text)
            .SubItems.Add(no.Text)
            .SubItems.Add(tipe.Text)
            .SubItems.Add(daerah.Text)
            .SubItems.Add(mbl.Text)
            .SubItems.Add(mbi.Text)
            .SubItems.Add(besar_Pemakaian.Text)
            .SubItems.Add(Biaya_Beban.Text)
            .SubItems.Add(HargaperKwh.Text)
            .SubItems.Add(Total_Tagihan.Text)
            .SubItems.Add(Pajak.Text)
            .SubItems.Add(pEMBAYARAN.Text)
            lv.Items.Add(lst)
        End With
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        isi_table()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        bersih(Me)
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        lv.Items.Remove(lv.SelectedItems(0))
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        End
    End Sub
    Sub bersih()
        kode.Text = ""
        nama.Text = ""
        no.Text = ""
        tipe.Text = ""
        daerah.Text = ""
        mbi.Text = ""
        mbl.Text = ""
        Biaya_Beban.Text = ""
        besar_Pemakaian.Text = ""
        Biaya_Beban.Text = ""
        HargaperKwh.Text = ""
        Total_Tagihan.Text = ""
        Pajak.Text = ""
        pEMBAYARAN.Text = ""
    End Sub

    Private Sub mbi_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles mbi.KeyPress
        If Asc(e.KeyChar) = 13 Then
            besar_Pemakaian.Text = Val(mbi.Text) - Val(mbl.Text)
            Total_Tagihan.Text = Val(Biaya_Beban.Text) + Val(HargaperKwh.Text) * besar_Pemakaian.Text
            Pajak.Text = 1.5 * Total_Tagihan.Text
            pEMBAYARAN.Text = Val(Total_Tagihan.Text) + Val(Pajak.Text)

        End If
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        lv.Items.Clear()
    End Sub
End Class

Membuat Program Form Nilai Mahasiswa menggunakan VB.Net 2008

noreply@blogger.com (Anonymous) — Thu, 14 Nov 2013 19:09:00 +0000

'Designlah seperti pada gambar'

'Berikut listing program yang akan anda inputkan'

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        npm.Items.Add("12110935")
        npm.Items.Add("12010022")
        npm.Items.Add("12020023")
        kode_dosen.Items.Add("D123")
        kode_dosen.Items.Add("D345")
        kode_dosen.Items.Add("D678")
        kode_matakuliah.Items.Add("K001")
        kode_matakuliah.Items.Add("K002")
        kode_matakuliah.Items.Add("K003")
        Dim i As Integer
        Nilai_kehadiran.Items.Clear()
        For i = 1 To 100
            Nilai_kehadiran.Items.Add(i)
        Next
        Nilai_tugas.Items.Clear()
        For i = 1 To 100
            Nilai_tugas.Items.Add(i)
        Next
        Nilai_UTS.Items.Clear()
        For i = 1 To 100
            Nilai_UTS.Items.Add(i)
        Next
        Nilai_UAS.Items.Clear()
        For i = 1 To 100
            Nilai_UAS.Items.Add(i)
        Next

    End Sub

    Private Sub npm_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles npm.SelectedIndexChanged
        Select Case npm.Text
            Case "12110935"
                nama.Text = "Erixon Andrianus Saruksuk"

            Case "12020023"
                nama.Text = "Abdul Rahmad"

            Case "12010022"
                nama.Text = "Rinaldi Pratama"

        End Select
        Dim x As String
        x = Strings.Mid(npm.Text, 3, 2)
        If x = "11" Then
            jurusan.Text = "Teknik Informatika"
        ElseIf x = "02" Then
            jurusan.Text = "Manajemen Informatika"
        ElseIf x = "01" Then
            jurusan.Text = "Teknik Komputer"
        End If
        x = Strings.Mid(npm.Text, 3, 2)
        If x = "11" Then
            Jenjang.Text = "S I"
        ElseIf x = "02" Then
            Jenjang.Text = "D III"
        ElseIf x = "01" Then
            Jenjang.Text = "D I"
        End If
    End Sub

    Private Sub KD_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles kode_dosen.SelectedIndexChanged
        Select Case kode_dosen.Text
            Case "D123"
                Nama_dosen.Text = "Mesran,S.kom, M.Kom"
            Case "D345"
                Nama_dosen.Text = "Rivalry K Hondro, S.Kom"
            Case "D678"
                Nama_dosen.Text = "Kenedi Tampubolon,S.si, M.Kom"

        End Select
    End Sub

    Private Sub KM_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles kode_matakuliah.SelectedIndexChanged
        Select Case kode_matakuliah.Text
            Case "K001"
                nama_mata_kuliah.Text = "Pemrograman Visual 1"
            Case "K002"
                nama_mata_kuliah.Text = "Sistem Basis Data"
            Case "K003"
                nama_mata_kuliah.Text = "Matriks dan Transformasi Linear"
        End Select
    End Sub

    Private Sub Btn_Proses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_Proses.Click

        Nilai_Akhir.Text = 0.1 * Nilai_kehadiran.Text + 0.15 * Nilai_tugas.Text + 0.3 * Nilai_UTS.Text + 0.45 * Nilai_UAS.Text
        If Nilai_Akhir.Text >= 80 Then
            Nilai_Huruf.Text = "A"
        ElseIf Nilai_Akhir.Text >= 70 Then
            Nilai_Huruf.Text = "B"
        ElseIf Nilai_Akhir.Text >= 60 Then
            Nilai_Huruf.Text = "C"
        ElseIf Nilai_Akhir.Text >= 50 Then
            Nilai_Huruf.Text = "D"
        Else
            Nilai_Huruf.Text = "E"
        End If
        If Nilai_Akhir.Text >= 50 Then
            Keterangan.Text = "Lulus"
        Else
            Keterangan.Text = "Gagal"
        End If
    End Sub

    Private Sub Btn_Keluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_Keluar.Click
        Close()
    End Sub

    Private Sub Btn_hapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_hapus.Click
        nama.Text = ""
        npm.Text = ""
        Keterangan.Text = ""
        Nilai_UTS.Text = ""
        Nilai_UAS.Text = ""
        Nilai_tugas.Text = ""
        Nilai_kehadiran.Text = ""
        Nilai_Akhir.Text = ""
        kode_dosen.Text = ""
        kode_matakuliah.Text = ""
        Nilai_Huruf.Text = ""
        Nama_dosen.Text = ""
        nama_mata_kuliah.Text = ""
        Jenjang.Text = ""
        jurusan.Text = ""
    End Sub
End Class

'Jalankan Program dengan menekan tombol F5 pada keyboard'

'contoh hasil tampilan program ketika dijalankan'

Merubah Format CDR ke JPG

noreply@blogger.com (Anonymous) — Sat, 31 Aug 2013 10:48:00 +0000

Halo Sobat Blogger, kali ini saya akan membagikan info yang baru saja saya dapat, Pernahkan Sobat Blogger membuat banner di Corel Draw??? mungkin, tapi file save nya kan nggak format JPG. Ya sudah saya bantu agan yang lagi kebingungan cara ubah Format CDR ke JPG. Berikut saya uraikan langkahnya

Langkah 1

Buka file CDR anda yang akan mau di rubah ke JPG. Kalau gatau caranya, gampang,! Disini saya akan jelaskan langkah – langkah nya.

Klik menu file - open (Ctrl+o)

Langkah 2

Klik Bitmaps – Convert to Bitmap maka akan muncul kotak dialog kurang lebih seperti ini :

Jangan takut anda bisa langsung pilih ukuran Resolution nya, untuk resolution bisa anda pilih yang standart saja yaitu 300 dpi, jika file yang mau anda rubah dengan ukuruan besar maka kurangi ukuran Resolutionny.

Setelah itu beri tanda centang pada kotak Apply ICC Profile dan kotak Transparent Background nya. lalu klik OK

Maka dengan secara otomatis file anda yang tadinya .cdr sudah menjadi sebuah Bitmap (gambar).

Langkah 3

Di sini anda tinggal mengeksportnya ke dalam bentuk JPG

adapun caranya klik menu file – Eksport (Ctrl+E)

Kemudian anda pilih lokasi diamana anda mau menyimpan file tersebut – beri nama di kotak File name dan pilih format JPG Bitmap di dalam kotak Save as type :

Kemudian klik tombol Export yang ada di bawah kotak dialog

Berikutnya anda akan di suguhi lagi dengan kotak dialog seperti ini :

Untuk pengaturannya biasanya corel secara otomatis telah mengaturnya, jika corel anda tidak mengatur dengan otomatis anda bisa mengaturnya sendiri , yaitu

Pada kolom Image Size terdapat kotak Width, Height, Format Resolution, Resolution, Maintain aspect ratio dan Maintain original size

Dalam kotak width dan height isi dengan 100 %

Di kotak Format Resolution pilih pixels

Di kotak Resolution isi dengan 300 dpi

Sedangkan di kotak Maintain aspect ratio di beri tanda Centang dan untuk kotak Maintain original size tidak usah di sentuh .. hehe

Contoh Hasilnya pengaturanya bisa di lihat di bawah ini :

Berikutnya anda akan di hadapi dengan kotak dialog .. tapi kali ini berbeda, anda cukup klik Option pada kotak dialog tersebut lalu isi angka 100 di kolom Dither Intensity, lalu klik OK.

Jika sudah maka akan muncul kotak dialog seperti ini :

Langsung saja anda beri centang pada kotak Optimize kemudian di kolom Sub Format pilih Standard (4:4:4) lalu di bagian Compression tarik hingga angka 18, Sedangkan di Smoothing nya tarik hingga angka 93, kurang lebih seperti ini :

kemudian klik OK.

SELESAI

Kalo berhasil Agan sudah mendapatkan object dengan format JPG, kalo belum coba ulangi lagi langkah-langkahnya secara Logis.

Terimakasih sudah berkunjung. Silahkan Tinggalkan komentar dibawah :)

Referensi : dari sini

Lowongan Kerja Yang Selalu Ada

noreply@blogger.com (Anonymous) — Wed, 24 Jul 2013 12:36:00 +0000

Halo sobat BLogger, kali ini saya akan membagikan satu informasi mengenai Pekerjaan. Bagi kaum muda yang berada pada posisi menengah kebawah pasti sulit dan tak mampu untuk melanjutkan kuliah, ingin bekerja tapi gelar tidak ada. Hanya sebatas ijasah SMA yang kini tidak banyak terpakai lagi untuk melamar pekerjaan. Saya ingin berbagi informasi ini pada teman-teman semua, bahwasannya kita generasi muda masih dapat mempunyai peluang untuk dapat duduk di bangku kuliah...

Artikel ini mungkin relevan pada golongan menengah kebawah, karena saya sudah jamin anda yang masih memiliki orang tua yang berkelebihan dapat dengan mudah hidup di zaman abad ke 20 ini.

Saya menyarankan kepada teman-teman yang masih mempunyai harapan dan semangat tinggi untuk sukses tidak ada salahnya mencoba mengajukan diri untuk bekerja di PT.ISS INDONESIA,

Jika kalian hidup dalam gengsi yang tinggi saya jamin hidup anda tidak akan nyaman, tapi cobalah jalani semuanya dengan ikhlas..

sobat bisa cari infonya di google untuk mengetahui letak alamat sesuai posisi anda berada,

untuk daerah Medan

Sobat bisa berkunjung ke daerah Jalan SM. Raja, tepatnya di Jalan Bahagia by Pass/Simpang Sempurna Ujung.

Waktu kita, dapat kita gunakan lebih efisien lagi jika kita bekerja dan belajar.

Berbagai Posisi jasa Pelayanan dapat anda coba.

^^ Syarat berkas yang dibutuhkan tidak lah sulit,
1. FC Ijasah min SMP/sederajat ( nb: Ijasah bisa lebih tinggi lagi tergantung posisi yang dikehendaki)
2. FC KTP
3. Surat Lamaran
4. CV
5. Pas Photo 3x4 warna

semua di satukan dalam amplop besar warna coklat, dan dikirm ke alamat kantor ISS berada. untuk info selanjutnya dapat menghubungi saya 081360380827(SMS Saja)

Ok, semoga artikel ini dapat membantu teman-teman yang sedang sulit dalam mencari pekerjaan.

Cara Menampilkan Tab Earrning di Dashboard Blogger

noreply@blogger.com (Anonymous) — Wed, 24 Jul 2013 11:50:00 +0000

Ketika SObat sedang ngeblog dan merasa banyak memiliki artikel pasti ada hasrat ingin menjadikan blog kita menjadi lahan penghasilan, namun tab uangkan yang kita cari untuk mendaftar nya tidak ada. Bagaimana?? apa kendalanya?? Jangan khawatir, dari pengalaman kita belajar, dan saya akan berbagi pengalaman yang saya coba ini, meskipun saya sendiri belum diterima oleh adsense. tapi Lumayan satu jalan terbuka, untuk mencoba blog kita di uji diterima atau tidak oleh Google Adsense, berikut langkah cara menampilkan Tab Uangkan/Earnnings pada Dashboard sobat.

Saya mencoba ini dengan tampilan Dashboard baru blogger

Tampilan Gambar ini akan memudahkan sobat tanpa harus saya terangkan panjang lebar. ketika sobat sudah memilih bahasannya jangan lupa di save, dan reload atau refresh halamannya.

Selamat Mencoba.. jika ada kendala jangan sungkan untuk bertanya...

Beberapa Syntax Kesamaan fungsi Input/Output dalam 3 Bahasa ini

noreply@blogger.com (Anonymous) — Tue, 23 Jul 2013 12:32:00 +0000

Selamat malam semuanya, kali ini saya akan mencoba membantu teman semua dalam mengenal lebih dalam lagi ketiga bahasa yakni pascal, c, dan c++.

sobat tentu penasaran ketika melihat program yang tampilannya sama, namun bahasa nya berbeda. sebenarnya itu dapat kita analisa dari pemakaian Menampilkan dan Menulis yang ada pada bahasa tersebut.

Berikut beberapa hal yang dapat anda pelajari dari kesamaan fungsi didalam ketiga bahasa ini

*Menulis/ Input Data

Pascal

untuk Menulis sebuah data baik itu huruf ataupun angka kita menggunakan read didalam bahasa Pascal, contoh

nilai : byte;

Read(nilai);

C

int nilai;

scanf("%d",&nilai);

C++

int nilai;

Cin>>nilai;

Menampilkan/Output Data

Dalam Menampilkan sebuah statement kita tidak perlu mengetikannya lagi dari keyboard ketika menjalankan program tersebut.

Pascal

write('Bahasa Pemrograman');

C

printf('Bahasa Pemrograman');

C++

Cout<<"Bahasa Pemrograman";

Ok, sobat BLogger,, semoga penjelasan yang singkat ini dapat membantu anda dalam mempelajari Bahasa Pemrograman, mana tahu anda memiliki cita-cita jadi seorang Programmer... :D

Pembelajaran ini disambung lagi esok hari, Selamat Malam.

Program Menampilkan Nilai Huruf Menggunakan Bahasa Pascal

noreply@blogger.com (Anonymous) — Tue, 23 Jul 2013 12:09:00 +0000

Hello sobat Programmer, sebelumnya kita telah mencoba membuat Program Menampilkan Nilai Huruf Menggunakan Bahasa C, nah kali ini sobat bisa mencoba nya dengan Bahasa Pascal, sekaligus sobat dapat mencoba menganalisa perbedaan keduanya.

yuk mari dicoba,

Uses Crt;
Var
   Na :byte;
   Nh :char;

Begin
     Clrscr;
     Writeln('Mencari Nilai Huruf');
     Writeln('-------------------------');
     Write ('Inputkan Nilai Angka:'); Readln(na);
     Case na of
          80..100 :Nh:='A';
          70..79   :Nh:='B';
          60..69   :Nh:='C';
          50..59   :Nh:='D';
          0..49    :Nh:='E';
     End;
     Writeln('Nilai Huruf :', Nh);
     Readln;
End.

Program Penambahan Matriks

noreply@blogger.com (Anonymous) — Tue, 23 Jul 2013 12:05:00 +0000

#include"iostream.h"
void main()
{
    int a[3][3], b[3][3],c[3][3];
    int i,j;
    cout<<"Program Penambahan Matrik\n";
    cout<<"\n Input Matrik A:";
    for(i=0;i<=2;i++)
        for(j=0;j<=2;j++)
        {
            cout<<"Nilai a["<            cin>>a[i][j];
        }
    cout<<"\n Input Matrik B:";
    for (i=0;i<=2;i++)
        for(j=0;j<=2;j++)
        {
            cout<<"Nilai b["<            cin>>b[i][j];
        }
            for(i=0;i<=2;i++)
                for(j=0;j<=2;j++)
                    c[i][j]=a[i][j]+b[i][j];
                    cout<<"Matrik C";
                    for(i=0;i<=2;i++)
                        for(j=0;j<=2;j++)
                            cout<<"\nc["<}

Program Menampilkan Nilai Huruf menggunakan Bahasa C

noreply@blogger.com (Anonymous) — Tue, 23 Jul 2013 12:00:00 +0000

Berikut contoh Program Menampilkan Nilai Huruf menggunakan Bahasa C

#include"conio.h"
#include"stdio.h"

main()
{
    int na;
    char nh;
    clrscr();
    printf("Mencari Nilai Huruf \n------\n");
    printf("Inputkan Nilai Angka :");
    scanf("%d",&na);
    if(na>=80 && na<=100)
        nh='A';
    else if(na>=70 && na<=79)
        nh='B';
    else if(na>=60 && na<=69)
        nh='C';
    else if(na>=50 && na<=59)
        nh='D';
    else if(na>=0 && na<=49)
        nh='E';
    printf("Nilai Huruf:%c",nh);
}

Program Pemakaian Seleksi Case pada Pascal

noreply@blogger.com (Anonymous) — Sat, 20 Jul 2013 12:33:00 +0000

Bahasa pemrograman PASCAL menyediakan 2 jenis seleksi dalam pemroses suatu data, yaitu IF dan CASE. Pada artikel ini akan dibahas pemakaian seleksi case of pada PASCAL.

Berikut contoh program pemakaian seleksi case of pada pascal.

uses crt ;
var
   Matakuliah    : string[30];
   nilai : byte ;
   ket,Nh    : string[10];
Begin
     clrscr ;
     Write('Mata Kuliah   : '); readln(matakuliah) ;
     Write('Nilai         : '); readln(nilai) ;
     Case nilai of
    80..100: Nh:='A' ;
    70..79 : Nh:='B' ;
    60..69 : Nh:='C' ;
    50..59 : Nh:='D' ;
    0..49 : Nh:='E' ;
    end;
    if nilai >49 then Ket:='lulus' else ket:='Gagal';
     Writeln('Nilai Huruf   : ', Nh);
     Writeln('Keterangan    : ', ket);
     readln;
end.

Selamat Mencoba.

Thomas Suarez, Programmer Cilik Pengganti Steve Jobs

noreply@blogger.com (Anonymous) — Tue, 02 Jul 2013 12:34:00 +0000

Dilihat dari tampangnya, sedikit mirip dengan saya, tapi amat sangat jauh lebih imut dia. Betul tidak ? hehe...
Siapakah dia ? Ya, namanya Thomas Suarez. Anda mungkin tidak kenal......apalagi saya....tidak kenal sama sekali. Hehe... Lalu apa hubungannya dengan Steve Jobs dan Apple ??

Begini, setelah meninggalnya Visioner dan Founder CEO Apple, Steve Jobs, beberapa waktu lalu, semua orang bertanya-tanya, siapakah yang mampu menggantikannya. Bukan untuk menggantikannya sebagai CEO Apple, karena Apple telah menunjuk Tim Cook untuk ini.
Steve Jobs terkenal dengan kejeniusan, pesona, dan visi masa depannya. Karakter dan sifat Jobs inilah yang menjadi fokus semua orang, sehingga memunculkan pertanyaan siapa "The Next Steve Jobs". Dan yang pasti bukan saya. Hehe...

Pertanyaan tersebut sepertinya akan segera terjawab. Dalam sebuah acara sharing teknologi TEDx ManhattanBeach, seorang anak yang masih duduk dibangku kelas 6 SD tampil memukau saat mempresentasikan produk ciptaan dan perusahaan startup-nya ke audience, dengan penuh percaya diri dan bahasa tubuh yang mengingatkan publik akan mendiang Steve Jobs.
Anak ini bernama Thomas Suarez, seorang anak berusia 12 tahun berasal dari California, AS. Dia adalah pendiri sebuah perusahaan startup CarrotCorp yang saat ini sedang mengembangkan aplikasi untuk sistem operasi Apple iOS.

Seperti yang di kutip dari Daily Mail, Thomas Suarez ternyata memang seorang pengagum Steve Jobs, telah tertarik membuat program komputer sejak taman kanak-kanak dan belajar secara otodidak beberapa bahasa pemrograman seperti Phyton, C, dan Java. Tidak seperti saya yang membuat blog saja masih acak-acakan seperti sarang penyamun. Hehe..

Karya pertamanya, yaitu Earth Fortune, hadir di akhir tahun 2010 lalu, sebuah program yang memungkinkan perubahan warna bumi berdasarkan peruntungan penggunanya.

Saat ini Thomas tetap fokus menimba ilmu di sekolah formal sambil tetap mengelola perusahaan startupnya, CarrotCorp.

Presentasinya di TEDx ini juga sedang memaparkan produk-produk yang dihasilkan oleh perusahaan startupnya itu. Selain memukau seluruh audience yang hadir, Thomas membuat penasaran dengan memamerkan sebuah tagline yang berbunyi "Uploading pictures will never be the. Coming soon."

Apakah Thomas Suarez dapat menggantikan idolanya itu, Steve Jobs ? Setidaknya dia mempunyai potensi untuk menuju ke arah sana.

source

Mengenal bahasa pemrograman HTML

noreply@blogger.com (Anonymous) — Sun, 30 Jun 2013 06:41:00 +0000

Bahasa pemrograman HTML

Bahasa mark up HTML merupakan bahasa program utama yang digunakan dalam pembuatan website atau blog. Kode ini memiliki arti penting dalam desain web karena merupakan pembentuk struktur dalam website, baik garis, huruf, warna, tampilan latar belakang, kerangka halaman dan elemen-elemen lainnya dalam sebauh halaman website.

Hingga saat ini HTML telah meluncurkan HTML 5 yang merupakan versi terbaru dari bahasa ini. Pengembangan in bertujuan untuk memperkuat dukungan terhadap sistem multimedia terbaru, supaya dapat mudah dibaca dan dipahami oleh komputer dan pendukungnya seperti browser. Meskipun terjadi pengembangan dan penambahan elemen-elemen baru dalam HTML, namun tidak banyak yang berubah, semua masih sama seperti HTML versi sebelumnya.

Sejarah bahasa HTML

Anda mungkin bertanya-tanya tentang sejak kapan bahasa HTML digunakan. Pada tahun 1980, IBM mengembangkan sebuah sistem yang diberi nama Generalized Markup Language atau GML. Lalu pada tahun 1986, ISO atau badan standardisasi dunia menyatakan GML sebagai bahasa standar yang digunakan dalam pembuatan dokumen. IBM lalu mengubah nama GML menjadi SGML dengan tambahan S sebagai singkatan dari Standarized.

HTML sendiri merupakan Subnet atau bagian dari SDML yang dapat juga digunakan untuk menjelajahi internet, terutama yang menggunakan protokol WWW atau Web. Dokumen HTML pada dasarnya tidak jauh berbeda dengan dokumen yang lain, yakni berisi teks dan kode untuk memformat tampilan teks tersebut. Perbedaan yang adalah penggunaan tag tertentu. Misalnya adalah jika ingin memiringkan teks, harus ditambahkan tag di awal teks dan tag diakhir teks supaya dapat menutup perintah sebelumnya.

Empat elemen pada bahasa HTML pada umumnya adalah:

Link

Link adalah pranala atau tautan yang digunakan untuk merujuk pada satu bagian dokumen atau halaman di luar dokumen yang ada. Misalnya jika anda ingin menambahkan link situs tertentu ke dokumen anda, maka anda bisa menggunakan link yang ditautkan pada suatu teks. Link ini akan ditampilkan berbeda, umumnya dengan garis dibawah teks yang bisa diklik untuk menuju ke halaman tertentu.

Style teks

Kode ini digunakan untuk menambahkan style atau format pada teks seperti menebalkan, memiringkan, memberi garis bawah serta juga dapat membesarkan dan mengecilkan teks. Dapat juga membuat daftar yang diiringi dengan garis bawah dan format yang standar.

Pembuatan obyek

Kode ini dapat digunakan untuk membuat obyek pendukung pada sebuah dokumen seperti membuat tombol, daftar atau garis horizontal.

Struktur teks

HTML mengenal struktur teks seperti heading 1, heading 2, paragraf, body atau hal-hal lain seperti dalam format dokumen pada umumnya.

Belajar HTML ini sangat mudah. Anda tinggal menyiapkan waktu dan pikiran yang tenang untuk belajar. Lalu anda dapat membuka situs w3school.org untuk memulai pelajaran anda tentang HTML. Selamat mencoba!

Mengenal bahasa Komputer atau bahasa pemrograman

noreply@blogger.com (Anonymous) — Sun, 30 Jun 2013 06:38:00 +0000

Pengertian Bahasa Pemrograman

Bahasa komputer adalah merupakan suatu set pemrograman yang digunakan untuk membuat suatu program komputer. Bahasa komputer biasa dikenal dengan nama bahasa pemrograman. Program komputer atau software sendiri adalah suatu set instruksi yang harus dijalankan oleh komputer pada saat komputer dihidupkan atau ketika diperintahkan oleh pengguna komputer. Bahasa pemograman menggunakan kata-kata unik yang menjadi kode untuk menjalankan perintah tertentu pada komputer. Contoh bahasa pemrograman antara lain adalah Pascal, Fortran, Clipper, dBase, Delphi, Basic, Cobol, C++, C#, Java dan lain-lain.

Sebuah CPU komputer, dalam hal ini prosesor memiliki sejumlah perintah terbatas dan dikenal dengan nama kode mesin. Kode ini adalah bahasa yang digunakan untuk mengkomunikasikan data dalam komputer. CPU dalam komputer hanya mengenal bahasa ini, tidak dengan bahasa lainnya. Semua bahasa pemrograman harus diubah menjadi kode mesin terlebih dahulu supaya CPU dapat mengolah dan menjalankan perintah yang diberikan oleh program yang dibuat.

Jenis-jenis bahasa komputer

Bahasa komputer dapat dikelompokkan dalam tiga kelompok besar berdasarkan jenisnya, yakni bahasa mesin (machine language), assembly language dan high level language. Mari kita bahas satu persatu sebagai berikut:

Machine language adalah seperangkat perintah yang dinyatakan dalam bentuk bilangan biner (hanya angka 0 dan 1) yang berfungsi untuk memberikan data dan instruksi bagaimana mengolah data kepada CPU.
Assembly Language adalah bahasa komputer tingkat rendah yang memiliki banyak kode yang membantu memori untuk “mengingat data (informasi). Assembly language juga mengandung seperangkat simbolis yang berhubungan dengan perintah tertentu pada bahasa mesin.
High level language disebut sebagai bahasa komputer tingkat tinggi karena berisi perintah yang dirancang mendekati bahasa manusia. Bahasa ini lebih mudah dipahami dan dipelajari oleh manusia dan digunakan untuk pembuatan program komputer tertentu. Macam bahasa pemrograman sudah kami sebutkan diatas.

Pembuat program atau programmer dewasa ini banyak yang menggunakan bahasa komputer tingkat tinggi untuk membuat program-program yang diinginkan karena sangat mudah dipahami. Namun sebelum bisa dijalankan di komputer, program tersebut haruslah diterjemahkan menjadi bahasa mesin terlebih dahulu. Maka dari itu pada perangkat pembuatan program dengan bahasa tingkat tinggi ada bagian yang bernama compiler. Tugas bagian ini adalah menerjemahkan perintah pada bahasa tingkat tinggi menjadi bahasa mesin, sehingga CPU dapat mengolah data berdasarkan perintah tersebut.

Sejarah singkat bahasa komputer

Perkembangan bahasa komputer tentu tak lepas dari perkembangan komputer itu sendiri. Bahasa komputer mulai dikembangkan pada saat penemuan komputer digital pertama, sekitar tahun 1940-an.Bahasa komputer yang termasuk dalam assembly language dikembangkan pada tahun 1950-an karena komputer mulai merambah ranah komersial. Contoh bahasa yang termasuk dalam golongan Assembly ini adalah ForTran (Formula Translation) yang dibuat oleh John Backus pada sekitar 1950-an hingga 1960-an. Kemudian bahasa komputer dengan banyak penyempurnaan mulai dikembangkan seperti COBOL (Common Business Oriented Language) oleh Grace Hopper, LISP (List Proccesing) oleh John McCarthy.

Pada akhir tahun 1960-an muncul sebuah bahasa komputer yang diberi nama SIMULA dan setelah itu perkembangan bahasa komputer semakin pesat. Pada tahun 1970-an muncul banyak bahasa pemrograman yang terkenal, yakni ALOGOL, BASIC, PASCAL, C dan ADA. Perkembangan bahasa komputer semakin berkembang pesat seiring berkembangnya ilmu pengetahuan dan teknologi. Bahasa yang berkembang adalah BASIC, JAVA, C++ dan PASCAL. Pada awal 1990-an, diperkenalkan istilah IDE (Integrated Development Environment) yang menyatukan bahasa pemrograman dan GUI sehingga membuat program menjadi lebih mudah. Beberapa IDE yang terkenal adalah Visual Basic (bahasa BASIC), Borland Delphi (bahasa PASCAL) dan Eclipse (Bahasa Java).

Program Informasi Penjualan Produk Menggunakan Bahasa C

noreply@blogger.com (Anonymous) — Fri, 14 Jun 2013 13:02:00 +0000

Mari kita mencoba sedikit program dengan bahasa C, dengan tampilan yang agak berbeda.
silahkan dicoba,

#include"stdio.h"
#include"conio.h"
void main()
{
int i,kode[15],jumlah[15],jumdata=5;
char*produk;
float harga,total,disc,pembayaran;

printf("\nInput Data Penjualan");
for(i=0;i    printf("\nKode Produk :"); scanf("%d",&kode[i]);
    printf("\nJumlah Produk :"); scanf("%d",&jumlah[i]);
}
clrscr();
printf("\nInformasi Penjualan Produk");
printf("\n-------------------------------------------------------------------------------");
printf("\nNo Kode Produk                  Harga   Jumlah    Total    Discount Pembayaran");
printf("\n-------------------------------------------------------------------------------");
for(i=0; i    if(kode[i]==1){
        produk="TV"; harga=2000000;
    }else if(kode[i]==2){
        produk="DVD"; harga=650000;
    }else if(kode[i]==3){
        produk="CD ROOM"; harga=450000;
    }
    total=harga*jumlah[i];
    if(total> 4000000)disc=0.1*total; else
    if(total< 4000000)disc=0;
    pembayaran=total-disc;
    gotoxy(1,6+i);printf( "%i   %d     %s ",i+1,kode[i],produk);
    gotoxy(30,6+i);printf("%10.0f   %i   %10.0f%10.0f%10.0f" ,harga,jumlah[i],total,disc,pembayaran);
    }
    printf("\n--------------------------------------------------------------------------------");
}

Contoh Hasil Tampilan

Program Input Harga Photo Copy Menggunakan Bahasa Pascal

noreply@blogger.com (Anonymous) — Sun, 02 Jun 2013 19:30:00 +0000

Yuk! Belajar Konsep Pemrograman Di Mesran.Blogspot.Com
______________________________________________________

Contoh Program Input Harga Foto Copy

uses crt;

var

Jumlahlembar : longint;

Totharga     : longint;

Pembayaran   : real;

hpl          : byte;

discount     : real;

begin

clrscr;

writeln('PROGRAM INPUT HARGA FOTO COPY');

writeln('-----------------------------------');

write('Jumlah Lembar :');readln(jumlahlembar);

if Jumlahlembar >=200 then hpl:=90 else

if jumlahlembar <=200 then hpl:=100;

writeln('Harga per Lembar:',hpl);

totharga :=hpl*jumlahlembar;

writeln('Total Harga:',totharga);

if totharga > 500000 then discount:=0.15 else

if totharga < 500000 then discount:=0;

discount:=totharga*discount;

writeln('Discount:',Discount:3:0);

pembayaran:= totharga-discount;

writeln('Pembayaran:',Pembayaran:3:0);

readln;

end.

------------------------------------------------------------------------------------
tampilan hasil

tampilan hasil ketika mendapatkan discount

Demikilahlah postingan saya
Nama : Erixon Andrianus Saruksuk
NPM : 12110935
Selamat Belajar Bahasa Pemrograman

Yuk! Belajar Konsep Pemrograman Di Mesran.Blogspot.Com

noreply@blogger.com (Anonymous) — Sun, 02 Jun 2013 19:30:00 +0000

Selesaikanlah Kasus Berikut ini : Program Perulangan Perkalian Input angka 5 Menggunakan Bahasa Pascal

Berikut jawabannya terlihat seperti dibawah ini :

uses crt;
var
i,hasil,n : integer;

begin
clrscr;
write('Input Nilai:');readln(n);
for i:= 1 to n do
begin
if (i=1)then
write('hasil:',i)
else write('*',i)
end;
hasil:= i*n*i-5
write('=',hasil);
readln;
end.

Lihat Hasil Program

Demikilahlah postingan saya Nama : Erixon Andrianus Saruksuk NPM : 12110935

Selamat Belajar Bahasa Pemrograman

Tugas Konsep Pemrograman

noreply@blogger.com (Anonymous) — Tue, 28 May 2013 11:24:00 +0000

Kali ini saya akan mempostingkan tugas dari Pak Mesran, yah... berhubung TI,M 1222 belum mendapat tugas dan nilai UTS nya pada anjlok, giliran kami aktif untuk memperbaikinya , jikalau ada artikel ini yang hampir sama, ya harap dimaklum. Tugas ini sifatnya pribadi, namun kesempatan copy paste terbuka lebar.

Sebelumnya beliau telah membuat program ini di dalam bahasa C++, dan kali ini kami diberi kesempatan untuk merubahnya kedalam bahasa Pascal. Berikut penulisannya dalam bahasa Pascal.

uses CRT;

Var

kode : byte;

harga,jumlah : longint;

th : longint;

nama : string;

begin

clrscr;

Writeln('Inputkan Kode Penjualan');

writeln('---------------------------');

write('kode:');readln(kode);

case kode of

1 : Begin

clrscr;

nama:='Televisi';

Writeln('Nama:',nama);

harga:=1750000;

writeln('Harga:',harga);

write('Jumlah Beli:');readln(jumlah);

th :=harga*jumlah;

writeln('---------------');

writeln('Total Harga:',th);

end;

2 : Begin

clrscr;

nama:='DVD';

writeln('Nama:',nama);

harga:=650000;

writeln('Harga:',harga);

write('Jumlah Beli:');readln(jumlah);

th:= jumlah*harga;

writeln('---------------');

writeln('Total Harga:',th);

end;

3 : Begin

clrscr;

nama:='CD ROOM';

writeln('Nama:',nama);

harga:=450000;

writeln('Harga:',harga);

write('Jumlah Beli:');readln(jumlah);

th := jumlah*harga;

writeln('---------------');

writeln('Total Harga:',th);

end;

readln;

end.

Jika anda sudah sesuai mengetikkan script diatas pada Aplikasi Turbo Pascal anda, kemudian tekan CTRL+F9, maka akan muncul tampilan gambar dibawah ini,

Namun jika belum tampil ataupun gagal, silahkan periksa kembali letak kesalahan anda.

Untuk memulai langkah selanjutnya, anda diberikan 3 pilihan untuk menginput kode produknya yaitu 1,2, dan 3. contoh ketikkan angka 1, maka akan tampil gambar seperti dibawah ini.

lalu ketikkan nominal jumlah belinya, misalnya 5.

pada akhirnya total harga dari produk yang anda ingin beli akan tampil,

dan itulah hasil akhir dari program ini, mudah bukan??. Semoga Artikel ini bermanfaat dan dapat membantu teman-teman semua.

anda dipersilahkan Copas artikel ini dengan menyertakan sumber link saya pada blog anda.

Cara Memasang Favicon Bergerak/Animasi di Blog

noreply@blogger.com (Anonymous) — Sun, 19 May 2013 10:00:00 +0000

Sedikit Penjelasan tentang Favicon, Favicon adalah icon utama yang muncul pada address bar suatu blog atau website dan merupakan logo dari blog tersebut, favicon bisa disebut juga sebagai identitas dari suatu blog agar tidak sama dengan blog lain, nah itu tadi sedikit penjelasan tentang favicon, tapi bagaimana supaya favicon kita berbeda dengan blog lain? Salah satu caranya adalah menggunakan favicon bergerak atau animasi,

favicon tersebut dapat kita peroleh dengan cara membuatnya atau pun mencari animasi gif di google.
dan berikut ini Cara memasang favicon bergerak/animasi di blog :
* Masuk ke Dashboard lalu pilih Template
* Edit Html jangan lupa centang Expand Template Widget untuk jaga-jaga
* Cari kode <![CDATA[/*

kemudian pastekan kode di bawah ini tepat di atas kode <![CDATA[/*

Kemudian simpan.

Keterangan : link yang https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEghpH0OjLeusiNuAMnSSn_wHEGjGJ0pN4cWoIWGEGwTtofhQWxpw3PvETeUU4McbAKn1LS_lmX5z0SDMlTogX-2MFnSe46kMlZ4IAartWrkKH0dNwmqiu2Ow7ShKc9RxISgi8WSXBTWnAiy/s1600/131.gif adalah favicon yang akan menjadi favicon di blog anda
untuk mengganti favicon tersebut tinggal diganti dengan link favicon gambar animasi untuk blog anda.

Semoga Berhasil...

Tips Trik Menurunkan/ Mengecilkan Alexa Rank.

noreply@blogger.com (Anonymous) — Sun, 19 May 2013 06:22:00 +0000

Alexa.com mendefinisikan mereka sebagai informasi perusahaan web. Alexa membuat peringkat setiap situs web dan blog berdasarkan lalu lintas dan beberapa faktor lainnya .Alexa Rank ini akan diperbarui bila artikel selalu uptade tiap hari ini akan dinyatakan alexa baik.

Bagaimana cara menurunkan Alexa Rank?

Anda juga akan menanyakan hal demikian untuk memperbaiki alexa rank blog anda agar tetap baik.

Alexa.com merupakan mengukur lalu lintas setiap situs Web Anda/orang lain sebagai salah satu survei yang paling adil di sekitar. Kenapa? karena mereka hanya mencatat hits stastik visitor today yang melewati sistem. Apabila pengunjung juga memiliki blog dan datang mengunjungi blog Anda maka disarankan mengInstal Alexa Toolbar pada browser mereka atau Anda harus menempatkan widget Alexa / plugin dipasang di blog Anda.

Ada baiknya blog dengan Blogging niche ( sama ), akan lebih baik dibandingkan dengan blog yang tidak berhubungan sama sekali, karena Teknologi yang dimiliki Alexa Rank akan memeriksa dan membuat rank.

Inilah 10 Cara Menurunkan Alexa Rank Super Cepat atau Tips trik menurunkan/mengecilkan Alexa rank dari hasil para master SEO:

1. Install Alexa Tool Bar

Instal Alexa Toolbar pada browser Anda dan juga meminta teman-teman Anda, pengunjung untuk menginstal toolbar pada browser mereka, SEPERTI di blog MILANISTI | Expression Blog dan blog sobatku lainnya yang sudah hebat - hebat semua alexa rank-nya.

Disini >> Download untuk browser Anda.

2. Claim situs Anda

Untuk mendapatkan kontrol penuh atas situs Anda, ada baiknya melakukan Claim site Anda pada Alexa.com. Ini akan membantu orang lain untuk mengetahui siapa yang memiliki situs dan membantu Anda dalam peringkat yang lebih baik di Alexa.

3. Meletakkan Widget Alexa di blog

Seperti cara yang diatas bahwa Alexa akan menghitung data hits yang berada di bawah sistemnya. Oleh karena, alangkah sempurna bila cara menurunkan alexa super cepat kita tempatkan widget Alexa di blog Anda.

4. Mendapatkan Lalu Lintas Dari Blogger lain ( Blogwalking )

Ini adalah faktor yang paling penting yang Anda ketahui dari efek alexa Rank. Jika Anda mendapatkan pengunjung lebih banyak dari blog orang lain atau pengunjung unik ini akan berpengaruh cepat pada penurunan alexa rank karena semua Blogger dan orang lainpun akan menginstal widget alexa pada browser mereka.

5. Write review tentang Alexa di blog Anda

Menulis review tentang Alexa Ranking dan linkkan kembali ke Alexa.com.

6. Saling berbagi review Alexa.

tujuannya untuk meninjau blog Anda di Alexa:

7. Commenting dan Backlinking

Cara ini memang sangat membantu sekali. Dengan berkomentar di blog lain yang masih berada Blogging niche sama. Cara ini dapat membangun link lebih dari blog dan lalu lintas akan lebih baik karena backlink merupakan hal penting.

8. Update blog Anda secara teratur

Hal ini sangat dianjurkan untuk menulis sering untuk menrunkan alexa rank anda atau yang lain Anda alexa rank akan turun dan itu menjadi sulit untuk membawa kembali Anda alexa lagi.

9. Tulisan posting berkualitas

Jika kualitas menulis posting anda berkualitas maka orang lain akan secara otomatis berkunjung kembali kepada situs Anda dan dengan demikian dapat meningkatkan backlink dan lalu lintas akan didapat.

10. Share posting Anda di situs Jaringan Sosial:

Berbagi posting Anda di jaringan sosial seperti Facebook, Stumble situs Digg dan lain sebagainya. Tentunya ini tidak hanya membawa lalu lintas besar, tetapi juga dapat membantu dalam menurunkan Alexa Rank dan backlink alexa Anda.

Cara Mendapatkan Uang Di Blog Dari www.KumpulBlogger.com

noreply@blogger.com (Anonymous) — Sun, 19 May 2013 05:52:00 +0000

Memperoleh penghasilan sendiri merupakan hal yang diimpikan banyak orang. Apalagi jika kita tidak perlu bekerja keras untuk memperoleh penghasilan. Seneng banget gak tuh?hehehe. Hal ini bagi sebagian orang sangat tidak masuk akal. Bagaimana mungkin memperoleh pendapatan namun tidak bekerja keras?? Tapi hal ini bukanlah hal yang mustahil untuk terjadi. Apalagi sekarang jaman sudah sangat berkembang. Salah satu cara untuk mendapatkan penghasilan dengan cara ini yaitu melalui Internet.

Kumpulblogger adalah salah satu program Pay Per Click (PPC) lokal Indonesia yang cukup terkenal dan mampu bersaing dengan PPC lokal lainnya. PPC yang satu ini banyak diminati oleh para blogger termasuk blogger pemula. Target market KumpulBlogger adalah Blogger Indonesia dan Advertiser Lokal, dimana Blogger menyediakan media dan Advertiser memasok pesan komersial di dalam Blog-blog yang terhubung pada jaringan KumpulBlogger. Ini artinya Advertiser (Pemasang Iklan) dapat mempromosikan iklan mereka melalui KumpulBlogger, sedangkan Blogger atau Publisher (Penerbit Iklan) dapat memasang iklan di blog mereka dan akan dibayar setiap iklan yang tayang diklik oleh pengunjung.

Bagi anda yang telah memiliki blog bisa mendaftar dan bergabung dengan KumpulBlogger sebagai Publisher (Penerbit Iklan). Mendaftar di KumpulBlogger tidak dipungut bayaran alias gratis. KumpulBlogger memberikan kemudahan kepada Blogger atau Publisher untuk memasang iklan di blog yang didaftarkan tanpa memberikan syarat batasan jumlah pengunjung minimal. Blog yang baru dibuatpun bisa dipasangi iklan dari KumpulBlogger. Inilah yang membuat KumpulBlogger makin diminati oleh para blogger terutama blogger pemula. Begitu iklan tayang di blog dan pengunjung melakukan klik, maka anda dibayar antara Rp 300 sampai Rp 400 rupiah perklik. KumpulBlogger langsung mentransfer Pay Out ke rekening anda setiap Minggu malam dengan ketentuan: Bank BCA minimal Pay Out Rp 10.000 dan selain Bank BCA minimal Pay out Rp 50.000.

Kurang apa KumpulBlogger? Mendaftar Free, persyaratan gampang dan blog baru langsung dapat iklan, transfer Pay Out tiap minggu, blog/website kita dapat menghasilkan uang ketika adanya orang yang meng-klik iklan yang terpasang pada blog/website kita. Apabila anda memiliki blog/website dengan pengunjung yang banyak, peluang penghasilan anda semakin besar. Berikut langkah-langkah mendaftar di KumpulBlogger, setting account KumpulBlogger, cara memperoleh kode iklan KumpulBlogger, dan cara memasang iklan KumpulBlogger di blog/website.

Cara Daftar Gratis di KumpulBlogger

Mendaftar gratis klik di sini

Selanjutnya mucul formulir seperti gambar berikut:

Masukkan email anda. Ingat! Password akan diberikan Automatis melalui email ini. Email dan password akan digunakan nanti sebagai User ID pada saat login ke kumpulblogger.com.
Masukkan captcha yang muncul pada kolom tersedia.
Klik Register untuk melanjutkan ke langkah berikutnya.

Setelah mengklik Register muncul pemberitahuan bahwa akun anda telah sukses gambar, klik OK untuk melanjutkan.

Silahkan buka email dan periksa email dari KumpulBlogger yang masuk ke inbox anda. Copy password yang diberikan.

Mendaftar KumpulBlogger telah selesai.

Cara Setting Account di KumpulBlogger

Setelah mendapatkan password, silahkan login dengan email dan password anda.

Setelah berhasil masuk pada bagian kiri halaman utama terdapat Navigasi Menu, Blogger, dan Advertiser seperti gambar berikut:

Navigasi Menu dipergunakan untuk: Edit Profile, Refferal Link, Ganti Password, dan Log Out.
Edit Profile. Lengkapi profile anda di KumpulBlogger, seperti gambar berikut:

Nama Lengkap Anda. Isi dengan nama lengkap anda.
Jenis Kelamin. Pilih jenis kelamin anda (Male = pria atau Female = wanita).
Nama Bank. Bila anda belum memiliki rekening bank, untuk sementara bagian ini boleh dikosongkan. Tetapi bila anda sudah memiliki rekening bank, sebaiknya di isi (lebih diutamakan Bank BCA, dan bisa juga Bank lain seperti: Bank Mandiri, Bank BNI, Bank BRI, dan lain-lain.
Nama Dalam Rekening/Account Bank. Isi dengan nama yang tercantum dalam rekening bank anda.
Nomor Rekening/Account Bank. Isi dengan nomor rekening bank anda.
PayPal Account. PayPal harap dikosongkan saja, jangan diisi karena pembayaran sudah melalui Rekening Bank Lokal di Indonesia.
Setelah semua data diisikan dengan benar, klik Submit untuk melanjutkan.

Refferal Link. Bagain ini terdiri dari Refferal Link (berisi url referal anda) dan My Refferal (berisi user yang telah bergabung melalui refferal anda). Anda dapat mengajak teman-teman anda untuk mendaftarkan juga ke KumpulBlogger.com, apabila mereka bergabung atas rekomendasi anda, maka setiap 1 kali klik dari pengunjung blog mereka, anda akan mendapatkan 25 Rupiah.

Ganti Password. Anda dapat mengganti password yang telah diberikan KumpulBlogger, seperti berikut:

Password Lama. Isi dengan password lama anda seperti yang diberikan oleh KumpulBlogger pada awal mendaftar.
Password Baru. Isi dengan password baru yang unik dan mudah diingat (password yang baik adalah gabungan antara huruf, angka, dan simbol)
Ulangi Password. Isikan kembali password baru anda
Setelah diisi dengan benar, klik Ubah Password untuk melanjutkan.

Log Out. Ini untuk keluar dari KumpulBlogger

Cara Memperoleh Kode Iklan di KumpulBlogger

Pada Menu Blogger terdapat Submenu: Tambah Blog, Edit Blog/Setting Tampilan, Script Text Advertising untuk Blog anda, Script Mini Banner untuk Blog anda, Statistik Revenue, dan Statistik Revenue dari 3rdParty (Indo.com,kutukutubuku,Smart)

Tambah Blog. Klik tambah blog untuk mendaftarkan blog yang ingin anda daftarkan di KumpulBlogger, seperti gambar berikut:

Nama Blog. Isikan nama blog anda, misalnya: “Erixon Online”.
Keterangan Tentang Blog. Isi dengan deskripsi blog anda, misalnya: “blog ini bertemakan menyebarkan informasi, ilmu pengetahuan, dan teknologi serta menyediakan juga file-file yang dapat di download gratis”.
Alamat URL Blog. Masukkan url blog anda, misalnya: “http://ericksaruksuk.blogspot.com”.
Category. Isi dengan kategori atau label blog anda, misalnya: “bisnis, internet, software, tutorial, ... ”.
Tag URL. Isi beberapa kata yang menggambarkan isi blog anda, misalnya: “musik, ebook, komputer, download, tutoral, blog, ... ”.
Bahasa yang digunakan dalam blog. Pilih bahasa blog anda, misalnya: “English, Indonesia, atau Campuran”.
Setelah semua data diisikan dengan benar, klik Submit untuk melanjutkan.

Jika berhasil akan muncul pesan ”blog berhasil ditambahkan pada account anda, sisipkan kode pada blog anda”.

Edit Blog/Setting Tampilan. Sebelum melakukan setting tampilan sesuai dengan template iklan yang anda inginkan, ada baiknya lihat dulu jenis iklan yang disediakan KumpulBlogger. Ada dua jenis iklan yang disediakan KumpulBlogger, yaitu: Iklan Teks dan Iklan Mini Banner. Iklan Teks terdiri dari Tampilan Vertikal (cocok dipasang pada sidebar), Tampilan Horizontal (cocok dipasang di Footer atau halaman content blog), Tampilan Horizontal Judul (cocok dipasang pada footer atau halaman content blog), Tampilan Ifrem Vertikal (cocok dipasang pada sidebar), dan Tampilan Ifrem Horizontal (cocok dipasang pada footer atau halaman content blog). Iklan Mini Banner berupa iklan gambar berukuran 125 x 125 yang tampil vertikal. Iklan ini sangat tepat ditempatkan di sidebar blog. Adapun contoh untuk Iklan Teks dapat anda lihat seperti gambar berikut:

Script Text Advertising untuk Blog anda. Ini untuk mendapatkan Script Iklan Teks yang anda inginkan.

Script Mini Banner untuk Blog anda. Ini untuk mendapatkan Script Iklan Mini Banner yang anda inginkan.

Statistik Revenue. Ini untuk melihat komisi pendapatan anda di KumpulBlogger.

Statistik Revenue dari 3rdParty (Indo.com,kutukutubuku,Smart). Ini untuk melihat komisi pendapatan Indo.com, Kutukutubuku, dan Smart.

Setelah memilih template iklan yang cocok dengan keiinginan anda, klik “Setting Theme Untuk Blog Ini”.

Lihat template iklan yang anda pilih tadi dan lakukan pengaturan warna dan tampilan.

Jika pilihan anda sudah benar, klik tombol “I Choose This”.

Selanjutnya, Copy/paste kode script tersebut pada notepat.

Cara Memasang Iklan KumpulBlogger di Blog

Silahkan login di http://www.blogger.com dengan account blog anda.

Klik Layout/rancangan.

Klik Tambahkan Gadget.

Pilih HTML/JavaScript dan akan terlihat seperti tampilan berikut ini:

Judul. Isi judul iklan anda, misalnya: Iklan, Sponsor, dan sebagainya.
Konten. Masukkan script/kode javascrip yang sudah anda dapatkan sebelumnya dari KumpulBlogger.
Klik tombol Simpan.

Klik tombol Save Arrangement/Simpan pada Loyout anda.

Lihat blog anda. Iklan KumpulBlogger langsung muncul sesuai dengan posisi dimana anda memasangnya.

Cara diatas adalah salah satu cara memasang iklan KumpulBlogger di blog dengan “Tambah Gadget”. Cara lain anda bisa memasangnya di sidebar, bawah judul posting, bawah/akhir posting, footer, dan sebagainya.

Mudahkan caranya. Klik di sini sekarang juga untuk mendaftar gratis di KumpulBlogger. Selanjutnya tinggal anda mencari pengunjung sebanyak-banyaknya dan berharap semoga mereka mengklik iklan di blog Anda. Setiap klik adalah rupiah bagi Anda. Selamat mencoba!

Hasilkan $ dengan Akun Adf.ly

noreply@blogger.com (Anonymous) — Tue, 14 May 2013 14:37:00 +0000

Apa itu Adf.ly??

Adf.ly adalah situs untuk memperpendek link sekaligus untuk menyembunyikan link aslinya (menyembunyikan link original), sebenarnya Adf.ly ini sama dengan situs-situs lain yang digunakan untuk memperpendek atau menyembunyikan link original, hanya saja kalau kita menggunakan adf.ly kita akan dibayar begitu ada orang yang melakukan klik terhadap link kita tersebut.

Yang paling sering penggunaan dari pemendekan atau penyembunyian link original ini adalah untuk tujuan link affiliasi. Karena dengan ini maka orang lain tidak bisa mengetahui link asli kita kalau tidak diklik link tersebut, tujuannya adalah agar bisa mendapatkan referral dari affiliasi tersebut.

Berikut ini detail tentang adf.ly

Ü Setiap kita mendaftar,kita akan langsung mendapatkan bonus $5

Ü Setiap link yang di klik pengunjung site kita, akan mendapatkan $0.001

Ü Pembayaran apabila mencapai $20

Ü Pembayaran menggunakan Paypal dan akan di proses setelah 48 jam-72 jam

Ü Jika anda ingin menambahkan link baru maka silahkan klik Do Another

Untuk pembayaran akan dilakukan melalui paypal, jadinya kita harus punya paypal dulu kalau mau menerima pembayaran.

Untuk memaksimalkan pendapatan dari link ini kita bisa menggabungkan Adf.ly dengan Ziddu.com. Diklik kita dibayar dolar, setelah didownload pun kita dapat tambahan dolar lagi.

Untuk berjaga-jaga sebaiknya link asli dari link yang kita kompres dengan Adf.ly kita backup atau kita simpan. Sehingga jika suatu saat terjadi trouble atau masalah dengan link dari adf.ly kita masih punya data link yang asli untuk selanjutnya kita perpendek atau kita kompres lagi menggunakan adf.ly

Bagaimana cara menggunakannya?

Ü Daftar ke Adf.ly

Ü Setelah pendaftaran klik di kolom Shrink dan masukkan link yang ingin diperpendek atau di share

Ü Klik kotak shrink jika sudah muncul link pengganti maka silahkan anda blok kemudian copy

Ü Paste-kan di tempat anda ingin share link tersebut (Blog, FB, e-mail dll)

Bagaimana jika anda menjumpay halaman Adf.ly?

Apabila anda menjumpay halaman Adf.ly maka anda harus menunggu selama 5 detik sehingga di sudut kanan atas muncul tulisan SKIP AD dengan kotak warna kuning lalu klik kotak tersebut maka anda akan langsung dialihkan ke link yang anda tuju.

Untuk yang ingin mendaftar adf.ly silahkan klik disini…

Untuk yang ingin mendaftar PayPal silahkan klik disini...

Cara Mendaftar PayPal Terbaru

noreply@blogger.com (Anonymous) — Tue, 14 May 2013 14:26:00 +0000

Sebagian besar dari para netter/ pengguna internet mungkin sudah tidak asing lagi mendengar tentang apa itu PayPal. Untuk di Indonesia paypal sudah banyak digunakan oleh sebagian toko online dalam hal pembayaran, karena Pembayaran online yang satu ini merupakan salah satu cara pembayaran online terbaik di dunia dan mudah untuk digunakan.

Jika kamu bergerak di bidang jual beli online, sudah wajib hukumnya mendaftar paypal untuk mempermudah transaksi pembayaran online. Selain itu dengan paypal, kamu bisa membeli aplikasi / game di App World BlackBerry atau App Store iPhone/iPad, jadi banyak sekali manfaat memiliki akun rekening paypal.

Cara mendaftar paypal cukup mudah dan membuat akun paypal tanpa dipungut biaya, jadi tunggu apa lagi? daftar paypal sekarang juga. Lihat langkah daftar paypal di bawah ini.

Berikut cara mendaftar paypal

1. Daftar Paypal
Klik tautan disamping untuk mendaftar paypal ( Klik ---> mendaftar paypal )

2. Pilih Akun Paypal
Disarankan menggunakan akun paypal dengan jenis akun primer, supaya bisa menerima dan mengirimkan balance paypal.

3. Isi Data Informasi
Silahkan isi data dan informasi diri dengan benar dan lengkap (PENTING)

Setelah selesai mengisi form pendaftaran, klik tombol "Setuju dan Buat Rekening".

Jika anda tidak memiliki kartu kredit, silahkan lewati dan "Masuk ke Rekening Saya"

4. Aktifkan Rekening Paypal
Untuk mengaktifkan rekening paypal, anda wajib mengkonfirmasikan alamat email yang anda gunakan sebelumnya untuk mendaftar paypal. Pertama klik tautan "Konfirmasi alamat email" yang berada pada pojok kanan atas (lihat gambar di bawah).

Untuk mudahnya, anda bisa langsung klik tautan yang ada pada langkah 2 (lihat gambar di bawah, yang ditandai dengan garis warna merah).

Setelah itu buka jendela/tab baru dan masuk ke email anda (email yang tadi anda gunakan untuk mendaftar paypal), lihat dan cek email dari service@intl.paypal.com, lalu lihat kode konfirmasinya. Catat kode konfirmasi tersebut.

Setelah mencatat kode konfirmasi, balik pada jendela/tab sebelumnya lalu salin kode konfirmasi tersebut pada kolom yang telah disediakan.

5. Buat Pertanyaan Keamanan
Setelah memasukkan kode konfirmasi, selanjutnya anda diminta untuk membuat pertanyaan keamanan. Silahkan anda membuat pertanyaan keamanan (harap pertanyaan keamanan dan jawabannya juga dicatat pada kertas/notepad dan disimpan baik-baik untuk jaga jaga)

Dan Voillaaa.... akun paypal anda sudah aktif, bagaimana? mendaftar paypal mudah bukan? :)

Akun paypal anda sudah aktif, namun masih terbatas hingga USD 100,00 (seratus dollar). Anda bisa menghilangkan batasan tersebut dengan cara verifikasi paypal melalui kartu kredit atau bisa juga dengan VCC (Virtual Credit Card)

Menumbuhkembangkan Jiwa Entrepreneurship Mulai Dari Kehidupan Di Kampus

noreply@blogger.com (Anonymous) — Sun, 12 May 2013 13:24:00 +0000

Kualitas Sumber daya manusia didunia ini menjadi kriteria penting dalam menjajaki dunia berwirausaha. Perusahaan tidak akan terbentuk besar begitu saja tanpa adanya anggota, modal, kerjasama dan tujuan bersama yang ingin dicapai. Gelar Sarjana saja belum tentu menjadi kriteria kesuksesan masa depan hidupnya, banyak mahasiswa yang setelah menyelesaikan kuliahnya dan menyandang gelar sarjana menjadi pengangguran tulen. Pemerintah memang sudah membuat Sekolah Menengah Kejuruan yang didalamnya ditanamkan nilai sikap jiwa entrepreneurship kepada siswa/I nya. Tapi mengapa masih banyak saja hal seperti itu kita temui. Hal itu bisa kita tinjau dari SDM nya itu sendiri.

Menjadi pengangguran bukan merupakan suatu pilihan, kita harus mensetting ulang pola berpikir kita karena sistem operasi di dunia ini sungguh dinamis. Di era global ini, menjadi pintar bukanlah suatu hal yang menjadi hal yang utama, sekilas kita bisa memperhatikan kehidupan pinggiran jalan. Mereka membuka usaha kecil-kecilan dan tak jarang kita jumpai usaha yang dulu hanya sebatas 3x4 m2 bisa menjadi 10x19 m2 bahkan melebihi luas lapangan bola sekalipun. Dalam hati kita pasti bertanya, hal istimewa apa yang mereka perbuat sehingga bisa menjadi besar seperti itu. Mahasiswa sekarang ini harus lebih kritis dalam meningkatkan kualitas hidup mereka. Banyak hal yang dapat dilakukan untuk menumbuhkembangkan jiwa entrepreneurship dilingkungan kampus tempat mahasiswa belajar, kebanyakan dapat kita jumpai dalam seminar, workshop, ataupun forum organisasi yang menyajikan materi yang berhubungan dengan berbisnis berwirausaha. Jangan pernah anda menyepelekan hal tersebut, mahasiswa harus lebih aktif dalam mencari informasi dan mencoba menerapkannya dalam kehidupan mereka sendiri.

Internet sudah menyajikan berbagai layanan yang dapat anda kembangkan dalam berbisnis, lalu tinggal andalah yang mengolahnya dengan tujuan untuk berwirausaha, ini dapat kita jumpai dalam bisnis jual/beli online yang sedang menjadi trend dari tahun ke tahun. Facebook, Twitter, dan aplikasi messanger lainnya dapat menjadi wadah promosi yang dapat kita terapkan jika kita ingin berbisnis online. Jika anda lemah dalam dunia internet, anda masih punya cara lain, seperti membuka usaha kecil-kecilan bersama dengan teman anda untuk meringankan modal yang dibutuhkan. Contohnya membuka warung makan dirumah anda di luar aktivitas kuliah sehingga tidak menggangu sistem yang sudah berjalan diperkuliahan anda, atau jika anda ingin berwirausaha sendiri tanpa teman masih ada sarana lain seperti jualan pulsa elektrik, ataupun menawarkan produk katalog dari perusahaan yang anda ikuti seperti Oriflame.

Hal yang harus kita sadari adalah anda sudah melabelkan pada diri anda sebagai mahasiswa, jadi jangan pernah menyerah ketika gagal, tetaplah belajar dan mau bekerja keras untuk memperbaiki kesalahan, selagi anda masih bernafas tekadkanlah dalam diri anda sendiri ” dengan jiwa entrepreneurship sangat banyak jalan menuju kesuksesan” tinggal anda yang menentukannya.