Translate

Rabu, 05 Juni 2013

Download Microsoft office 2013 Full activated

Download Microsoft office 2013 Full activated


Halo semua setelah lama ga update akhirnya pada malam yang sunyi dan melelahkan ini saya akan update postingan saya dengan software yang pastinya gak asing lagi buat kita Microsoft office 2013, kali ini saya akan mebagi link downloadnya kepada sobat semua. Microsoft office adalah software yg banyak digunakan untuk mengetik, membuat persentasi, edit gambar dan hal-hal lainnya yang pastinya sangat membantu bagi para pegawai kantor. Anak kuliahan,  anak sekolah dll. Banyak fitur baru pada Microsoft office 2013 ini yaitu seperti yang dapat kita lihat dibawah ini :
1.      Integrasi dengan SkyDrive
Microsoft mendesain Office 2013 sebagai aplikasi yang terintegrasi dengan cloud storage. Dalam hal Microsoft menyediakan SlcyDrive dan SharePoint. Opsi mi bisa Anda manfaatkan jika ingin share dokumen secara online dengan pihak lain. Jika Anda memilih menggunakan Sl’Drive, detil dan akun Anda akan ditampilkan di pojok-kiri atas, baik pada app screen maupun start screen untuk masingm asing aplikasi. Dengan khk pada detil akun tersebut Anda bisa berpindah akun sekaligus mengaturnya. Ketika Anda menyimpan sebuah dokumen, worksheet atau presentasi, secara default aplikasi akan menyimpannya ke akun SkyDrive tetapi tentu saja Anda bisa dengan mudah mengubahnya ke local disk.
2.       Sinkronisasi dengan device lain
Ketika Anda menyimpan sebuah dokumen Office 2013 di cloud, maka dokumen tersebut nantinya bisa Anda akses melalui device lain. Anda bisa mengaksesnya baik melalui komputer, tablet atau via WebApps. Dalam hal ml Microsoft telah upgrade WebApps untuk Word, Excel, OneNote dan PowerPoint dengan tampilan baru.
3.       Edit PDF
Jika di Microsott Ottice versi ama naa nanya uisa menyimpan aoiumen aaiam rue i-’ur- tetapi uaai bisa mengeditnya di PDF maka di Office 2013 Anda bisa melakukan dua hal itu dengan mudah. Selain bisa menyimpan sebuah file Word ke PDF, Anda juga bisa mengedit file tersebut di dalam PDF. Setelah diedit di Office 2013, Anda bisa menyimpannya kembali dalam bentux DocX atau langsung menjadi PDF.
4.       Format Task Panes di PowerPoint
PowerPoint di Office 2013 memberikan perbaikan penting sehingga Anda bisa memformat gambar, bangun datar dan obyek lain dengan lebih mudah. Cukup klik-kanan pada sebuah gambar dan pilih Format Picture maka akan terbuka Format Picture task pane baru. Di dalamnya ada serangkaian opsi yang bisa Anda pilih untuk memformat gambar.
Baca selengkapnya tentang fitur disini

Setelah kita bahas tentang fitur diatas, bila ada yang tertarik dengan Microsoft office 2013. Saya akan membagi link downloadnya secara gratis dan full version untuk sobat semua dibawah ini :

Product key  :
  • Untuk MS Office 2013 32 Bit: CGNXD-FCF7H-Y8V2Q-6PGXX-CDHT4  
  • Untuk MS Office 2013 64 Bit: DTNQD-3K9GW-RJ9HR-HDG4S-HCCDF 
 Bila product key diatas tidak bisa download software aktivator dan langkah-langkahnya disini

Sabtu, 11 Mei 2013

Kumpulan Emoticon Chat Facebook Unik Posted by Safar Riduan pasaribu Nah berikut ini adalah Kumpulan Emoticon Chat Facebook Unik, Keren, Terlengkap, dan Terbaru 2013.




Tetapi anda jangan lupa untuk menyimpan atau bookmark halaman ini dulu. Karena, jika saat anda chat menggunakan fb dan pengen memakai Smiley Facebook terbaru 2013 ini tidak susah susah mencarinya. Jadi anda tinggal langsung menuju halaman ini. Oke, ini dia :

    [[334954663181745]] - Kode Smiley Facebook untuk Spongebob
    [[332936966718584]] - Kode Smiley Facebook Hello Kitty
    [[326134990738733]] - Kode Smiley Facebook Pikachu
    [[297354436976262]] - Kode Smiley Facebook Santa Claus
    [[269153023141273]] - Kode Smiley Facebook Poring
    [[252497564817075]] - Kode Smiley Facebook Kerokeroppi
    [[250128751720149]] - Kode Smiley Facebook Domo Kun
    [[249199828481201]] - Kode Smiley Facebook Konata Izumi
    [[236147243124900]] - Kode Smiley Facebook Pokeball
    [[224502284290679]] - Kode Smiley Facebook Nobita
    [[223328504409723]] - Kode Smiley Facebook Gintoki Sakata
    [[196431117116365]] - Kode Smiley Facebook Shin chan
    [[157680577671754]] - Kode Smiley Facebook Angry Bird
    [[155393057897143]] - Kode Smiley Facebook Doraemon
    [[144685078974802]] - Kode Smiley Facebook Mojacko
    [[138529122927104]] - Kode Smiley Facebook Pedo Bear

Maka tampilan gambarnya seperti dibawah ini!.
Kumpulan Emoticon Chat Facebook Unik & Keren Terbaru, PutuGiBagi
Emotion Kaskus untuk chat facebook :

    [[243344945733611]] : Kaskus Repost
    [[mahochat]]: Kode Smiley Facebook Kaskus Maho:
    [[205827876172490]] : Kode Smiley Facebook Kaskus Bingung:
    [[261018420628968]] : Kode Smiley Facebook Kaskus Like:
    [[328740787138287]] ; Kode Smiley Facebook Kaskus Nope:
    [[296027833771776]] : Kode Smiley Facebook Kaksus Capedehh:
    [[311851138846391]] : Kode Smiley Facebook Kaskus 4L4y:
    [[guengakak]] : Kode Smiley Facebook Kaskus Ngakak:
    [[203443053077888]] : Kode Smiley Facebook I Love Kaskus:

Emotion Text Facebook Format tulisan Bold :

    [[196920740401785]] - A
    [[113544575430999]] - B
    [[294715893904555]] - C
    [[294660140569858]] - D
    [[328415510520892]] - E
    [[270221906368791]] - F
    [[212614922155016]] - G
    [[205633882856736]] - H
    [[256255337773105]] - I
    [[288138264570038]] - J
    [[296999947008863]] - K
    [[216672855078917]] - L
    [[278786215503631]] - M
    [[241341589270741]] - N
    [[312524205448755]] - O
    [[200138403410055]] - P
    [[165410113558613]] - Q
    [[203403609746433]] - R
    [[334427926570136]] - S
    [[250632158335643]] - T
    [[285985351447161]] - U
    [[343627398996642]] - V
    [[315740851791114]] - W
    [[136342506479536]] - X
    [[224173507657194]] - Y
    [[317710424919150]] – Z

Kode smiley facebook Lucu dan unik :

    Troll face: [[171108522930776]]
    ARE YOU F****NG KIDDING ME: [[143220739082110]]
    Me Gusta: [[211782832186415]]
    Mother of God: [[142670085793927]]
    Cereal Guy: [[170815706323196]]
    LOL Face: [[168456309878025]]
    NO Guy: [[167359756658519]]
    Yao Ming: [[218595638164996]]
    Derp: [[224812970902314]]
    Derpina: [[192644604154319]]
    Forever Alone: [[177903015598419]]
    Not Bad : [[NotBaad]]
    F*** yeah : [[105387672833401]]
    Challenge accepted: [[100002727365206]]
    Okay face: [[100002752520227]]
    Dumb b***h: [[218595638164996]]
    Poker face [[129627277060203]]
    Okay face [[224812970902314]]
    Official rage face [[FUUUOFFICIAL]]
    No [[167359756658519]]
    MOG [[142670085793927]]
    Feel like a sir [[168040846586189]]
    Forever alone christmas. [[125038607580286]]

Senin, 14 Januari 2013

PROGRAM SEDERHANA C++

INI adalah program sederhana c++.

#include <iostream.h>;
#include <conio.h>;

int fungsi_menu(void);
float fungsi_perKalian(void);
float fungsi_pemBagian(void);
float fungsi_pengUrangan(void);
float fungsi_penAmbahan(void);
int menu_exit(void);
main ()
{
  fungsi_menu();
  return 0;
}

int fungsi_menu()
{
  clrscr();
  int a;

  gotoxy(20,1);cout<<"=RUMUS MATEMATIKA SEDERHANA=";
  gotoxy(30,2);cout<<"BY";
  gotoxy(20,3);cout<<"SAFAR RIDUAN PASARIBU";

  gotoxy(25,5);cout << "——pilih——\n";
  cout << "1. perkalian\n";
  cout << "2. pembagian\n";
  cout << "3. pengurangan\n";
  cout << "4. penambahan\n";
  cin >> a;

  switch (a)
  {
     case 1: fungsi_perKalian(); break;
     case 2: fungsi_pemBagian(); break;
     case 3: fungsi_pengUrangan(); break;
     case 4: fungsi_penAmbahan(); break;
     default: break;
  }
  return 0;
}


float fungsi_perKalian()
{
float x,y,z;
cin >> x ;
cin >> y ;
z = x * y;
cout << "hasilnya : " << z << endl;
cout << endl;
menu_exit();
return 0;
}


float fungsi_pemBagian()
{
float x,y,z;
char a;
cin >> x ;
cin >> y ;
z = x / y;
cout << "hasilnya : " << z << endl;
cout << endl;
menu_exit();
return 0;
}

float fungsi_pengUrangan()
{
float x,y,z;
char a;
cin >> x ;
cin >> y ;
z = x - y;
cout << "hasilnya : " << z << endl;
cout << endl;
menu_exit();
return 0;
}

float fungsi_penAmbahan()
{
float x,y,z;
char a;
cin >> x ;
cin >> y ;
z = x + y;
cout << "hasilnya : " << z << endl;
cout << endl;
menu_exit();
return 0;
}

int menu_exit()
{
  char a;
  if (a == 'y')
  {
     cout << endl;
     fungsi_menu();
  }
  else
  {
  cout << "terimakasih telah menggunakannya";
  }
  return 0;
}


maaf klo ada error,soalnya q juga baru belajar

Minggu, 29 Januari 2012

soal no 3 (safar riduan pasaribu)


Listing program login
Public Class Form1
Private Sub btnok_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnok.ClickIf username.Text = "Safar" And password.Text = "000" Then

formmenu.Show()Me.Hide()ElseMsgBox(
username.Text =
"Maaf! Password salah!")""password.Text = ""End IfEnd Sub

Private Sub password_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles password.KeyPressDim tombol As Integer = Asc(e.KeyChar)If tombol = 13 Thenbtnok_Click(sender, e)
End IfEnd Sub
Private Sub password_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles password.TextChangedEnd Sub
Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.ClickEndEnd Sub

End

Listing prorgam menu
Public Class formmenu

Private Sub DataPenggajianToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataPenggajianToolStripMenuItem.ClickPenggajian.Show()End Sub

End
Listing program pegawai
Public Class Penggajian
No.Text =
Sub clearisian()""Kode.Text = ""Nama.Text = ""Jabatan.Text = ""Gaji.Text = ""Status.Text = ""Tistri.Text = ""Janak.Text = ""Tanak.Text = ""Jam.Text = ""Lembur.Text = ""Pajak.Text = ""Total.Text = ""No.Focus()
End Sub
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.Columns.Add(
Lv.View =
Lv.GridLines =
Sub buattabel()"No", 30, HorizontalAlignment.Center)"Kode Pegawai", 80, HorizontalAlignment.Left)"Nama Pegawai", 180, HorizontalAlignment.Left)"Jabatan", 80, HorizontalAlignment.Left)"Gaji", 80, HorizontalAlignment.Left)"Status", 80, HorizontalAlignment.Left)"Tunj Istri", 80, HorizontalAlignment.Left)"Jumlah Anak", 80, HorizontalAlignment.Left)"Tunj Anak", 80, HorizontalAlignment.Left)"Jam", 50, HorizontalAlignment.Left)"Lembur", 80, HorizontalAlignment.Left)"Pajak", 80, HorizontalAlignment.Left)"Total Gaji", 80, HorizontalAlignment.Left)View.DetailsTrueLv.FullRowSelect = TrueEnd Sub
Sub isitabel()Dim Lst As New ListViewItemLst.Text = No.Text
Lst.SubItems.Add(Kode.Text)
Lst.SubItems.Add(Nama.Text)
Lst.SubItems.Add(Jabatan.Text)
Lst.SubItems.Add(Gaji.Text)
Lst.SubItems.Add(Status.Text)
Lst.SubItems.Add(Tistri.Text)
Lst.SubItems.Add(Janak.Text)
Lst.SubItems.Add(Tanak.Text)
Lst.SubItems.Add(Jam.Text)
Lst.SubItems.Add(Lembur.Text)
Lst.SubItems.Add(Pajak.Text)
Lst.SubItems.Add(Total.Text)
Lv.Items.Add(Lst)
End Sub
buattabel()
Kode.Items.Add(
Kode.Items.Add(
Kode.Items.Add(
Kode.Items.Add(
Jabatan.Items.Add(
Jabatan.Items.Add(
Jabatan.Items.Add(
Status.Items.Add(
Status.Items.Add(
Jam.Items.Add(
Jam.Items.Add(
Jam.Items.Add(
Private Sub Penggajian_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load"A001")"A002")"B001")"B002")"MANDOR")"KEPALA BAGIAN")"STAF")"MENIKAH")"TIDAK MENIKAH")"1")"2")"3")End Sub

Private Sub Keluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Keluar.ClickMe.Close()End Sub

Private Sub Bersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Bersih.ClickCall clearisian()End Sub
isitabel()
Private Sub Simpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Simpan.ClickEnd Sub
Private Sub Kode_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Kode.SelectedIndexChangedIf Kode.Text = "A001" ThenNama.Text = "Rahmadhani arlinda"ElseIf Kode.Text = "A002" ThenNama.Text = "Nanda"ElseIf Kode.Text = "B001" ThenNama.Text = "Dika"ElseIf Kode.Text = "B002" ThenNama.Text = "nunun iswanti"End IfEnd Sub
Private Sub Jabatan_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Jabatan.SelectedIndexChangedIf Jabatan.Text = "MANDOR" ThenGaji.Text = 1750000
ElseIf Jabatan.Text = "KEPALA BAGIAN" ThenGaji.Text = 2500000
ElseIf Jabatan.Text = "STAF" ThenGaji.Text = 1250000
End IfEnd Sub
Private Sub Status_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Status.SelectedIndexChangedIf Status.Text = "MENIKAH" ThenTistri.Text = (0.09 * Gaji.Text)
ElseIf Status.Text = "TIDAK MENIKAH" ThenTistri.Text = 0
End IfEnd Sub
Private Sub proses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles proses.ClickIf Janak.Text = 1 ThenTanak.Text = (0.03 * Gaji.Text)
ElseIf Janak.Text >= 2 ThenTanak.Text = (0.07 * Gaji.Text)
End If 
If Jabatan.Text = "STAF" And Jam.Text = 1 ThenLembur.Text = 5000
ElseIf Jabatan.Text = "STAF" And Jam.Text = 2 ThenLembur.Text = 10000
ElseIf Jabatan.Text = "STAF" And Jam.Text = 3 ThenLembur.Text = 15000
ElseIf Jabatan.Text = "MANDOR" And Jam.Text = 1 ThenLembur.Text = 7500
ElseIf Jabatan.Text = "MANDOR" And Jam.Text = 2 ThenLembur.Text = 15000
ElseIf Jabatan.Text = "MANDOR" And Jam.Text = 3 ThenLembur.Text = 22500
ElseIf Jabatan.Text = "KEPALA BAGIAN" And Jam.Text = 1 ThenLembur.Text = 10000
ElseIf Jabatan.Text = "KEPALA BAGIAN" And Jam.Text = 2 ThenLembur.Text = 20000
ElseIf Jabatan.Text = "KEPALA BAGIAN" And Jam.Text = 3 ThenLembur.Text = 30000
End If 
Pajak.Text = (0.015 * Gaji.Text)
Total.Text = Val(Gaji.Text) + Val(Tistri.Text) + Val(Tanak.Text) + Val(Lembur.Text) - Val(Pajak.Text)
End Sub
Lv.Items.Clear()
Private Sub Hapussemua_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Hapussemua.ClickEnd Sub
Lv.Items.Remove(Lv.SelectedItems(0))

End
http://mesran.wordpress.com/2012/01/26/soal-quiz-online-hari-senin/

Private Sub Hapuspilih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Hapuspilih.ClickEnd Sub ClassHasil program
Private Sub formmenu_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.LoadEnd Sub ClassHasil program
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.LoadEnd Sub ClassHasil program