choose your languages

English French German Spain Italian Dutch

Russian Portuguese Japanese Korean Arabic Chinese Simplified

Suara Aneh Pada Harddisk

Curigai dan Deteksi Suara Aneh Pada Harddisk Anda.

Astra 32, Software pemberi informasi spesifikasi hardware dan driver komputer

Tak usah bingung ketika tak tahu spesifikasi hardware dan driver.

Foxit Reader software pembaca Pdf yang ringan

Foxit Reader pembaca pdf yang lebih cepat loading interfacenya daripada Adobe Reader.

iWisoft Free Video Converter free download

Conversi file mulmimedia Anda dengan iWisoft Free Video Converter.

DAM mendownload dengan cepat

DAM mendownload cepat dan dapat di resume.

Minggu, 29 April 2012

Facebook Akuisisi Instragram Untuk Ubah Tampilan Profil Usernya


Instagram memang menjadi fenomena saat ini. Setelah berhasil menggandeng 30 juta pengguna iOS untuk turut serta, dan menjadi salah satu aplikasi yang mencetak sejarah dengan jumlah pengunduh terbanyak hanya beberapa saat setelah rilis pada Google Play.
Setelah dikejutkan dengan banyaknya jumlah pengunduh, kini berita mengejutkan muncul dari Facebook yang telah membeli Instagram sebesar US$ 1 Milyar secara cash dan saham, seperti yang terkutip pada pernyataan resmi dari Facebook pada hari Senin (9/4/2012) Kemarin.
“Selama beberapa tahun, Facebook telah menjadi sebuah websiteyang memberikan pengalaman terbaik untuk sharing foto dengan saudara dan kerabat Anda. Dan sekarang kita dapat bekerja sebagai satu tim dengan tim Instagram, yang juga memberikan pengalaman terbaik dalam sharing foto” Ujar Mark Zuckeberg dalam facebooknewsroom.
Walaupun dikuasai penuh oleh Facebook, Instagram tidak akan langsung bergabung menjadi satu website dengan facebook, tetapi tetap akan dikembangkan secara independen, untuk tetap menjaga pengalaman terbaik dalam menggunakan Instagram.
Selama ini Instagram memang menjadi mini social media seperti Twitter, dan eksklusif untuk pengguna smartphone dengan OS Apple iOS dan Android. Tetapi dengan dibelinya Instagram oleh Facebook, akankah Instagram akan se-komersil Facebook? Atau langkah ini merupakan antisipasi Facebook yang mulai kehilangan penggunanya? Serukan pendapat Anda.

Windows 8 Akan Hadir dalam 4 Model(Versi)


Setelah bertahun-tahun konsumen dibuat bingung karena sistem operasi yang sama memiliki beberapa versi berbeda, Microsoft baru-baru ini mengumumkan Windows 8 akan muncul hanya dalam empat versi. Empat versi tersebut antara lain versi home use, business, versi untuk perangkat dengan chip ARM, terakhir untuk perusahaan yang membeli dalam jumlah besar.

Bagi pengguna yang ingin membeli sistem operasi Windows 8 untuk desktop maupun laptop, dapat memilih hanya dua versi Windows 8. Versi yang dinamai Windows 8 saja dirancang untuk pengguna rumahan, sementara Windows 8 Pro yang di dalamnya terdapat fitur enkripsi system file, virtualisasi dan daomain management, ditujukan bagi pelanggan bisnis.

Sementara Windws RT merupakan nama versi baru untuk apa yang disebut sebagai Windows for ARM. Untuk mendapatkannya, konsumen tidak dapat membeli secara langsung samun sistem operasi versi ini sudah dalam kondisi terinstall pada PC atau tablet yang menggunakan prosesor ARM. Windows RT tidak dapat menjalankan softwer desktop tradisional X86/64, namun akan menjalankan aplikasi berorientasi sentuh berbasis Windows Runtime atau WinRT, yaitu model pemrograman Microsoft untuk aplikasi mobile. Aplikasi untuk interface Metro yang berorientasi sentuh  juga dibangun seluruhnya menggunakan Windows Runtime.

Windows RT juga akan muncul dengan Microsoft World, Excel, PowerPoint, One Note versi khusus yang touch-oriented.

Brandon LeBlanc dari Microsoft dalam posting di blognya tidak menyebutkan kapan Windows 8 tersedia maupun harga memperoleh masing-masing versi. Namun, ia secara resmi membenarkan asumsi yang telah beredar luas jauh hari sebelumnya bahwa sistem operasi terbaru Microsoft akan dinamai dengan Windows 8

Taukah Anda Apa itu SPAM..?

Spam atau bisa juga berbentuk junk mail adalah penyalahgunaan sistem pesan elektronik (termasuk media penyiaran dan sistem pengiriman digital) untuk mengirim berita iklan dan keperluan lainnya secara massal. Umumnya, spam menampilkan berita secara bertubi-tubi tanpa diminta dan sering kali tidak dikehendaki oleh penerimanya. Pada akhirnya, spam dapat menimbulkan ketidaknyamanan bagi para pengguna situs web. Orang yang menciptakan spam elektronik disebut spammers.
Bentuk spam yang dikenal secara umum meliputi : spam surat elektronik, spam pesan instan, spam Usenet newsgroup, spam mesin pencari informasi web (web search engine spam), spam blog, spam wiki, spam iklan baris daring, spam jejaring sosial.

Beberapa contoh lain dari spam, yaitu pos-el berisi iklan, surat masa singkat (SMS) pada telepon genggam, berita dalam suatu forum kelompok warta berisi promosi barang yang tidak terkait dengan kegiatan kelompok warta tersebut, spamdexing yang menguasai suatu mesin pencari (search engine) untuk mencari popularitas bagi suatu URL tertentu, berita yang tak berguna dan masuk dalam blog, buku tamu situs web, spam transmisi faks, iklan televisi dan spam jaringan berbagi.
Spam dikirimkan oleh pengiklan dengan biaya operasional yang sangat rendah, karena spam tidak memerlukan senarai (mailing list) untuk mencapai para pelanggan-pelanggan yang diinginkan. Karena hambatan masuk yang rendah, maka banyak spammers yang muncul dan jumlah pesan yang tidak diminta menjadi sangat tinggi. Akibatnya, banyak pihak yang dirugikan. Selain pengguna Internet itu sendiri, ISP (Penyelenggara Jasa Internet atau Internet Service Provider), dan masyarakat umum juga merasa tidak nyaman. Spam sering mengganggu dan terkadang menipu penerimanya. Berita spam termasuk dalam kegiatan melanggar hukum dan merupakan perbuatan pidana yang bisa ditindak melalui undang-undang Internet.
Di Indonesia undang-undang kini akan segera direvisi terkait maraknya SMS spam yang beredar di masyarakat..

ARRAY dan Contoh Programnya pada Pascal

Array adalah tipe data terstruktur yang terdiri dari sejumlah komponen-komponen yang mempunyai tipe sama. Komponen-komponen tersebut disebut sebagai komponen type, larik mempunyai jumlah komponen yang jumlahnya tetap. Banyaknya komponen dalam larik ditunjukkan oleh suatu index, dimana tiap komponen di array dapat diakses dengan menunjukkan nilai indexnya atau subskript. Array dapat bertipe data sederhana seperti byte, word, integer, real, bolean, char, string dan tipe data scalar atau subrange. Tipe larik mengartikan isi dari larik atau komponen- komponenya mempunyai nilai dengan tipe data tersebut.
Contoh:
Var
Untai : array[1..50] of Integer;
Pada contoh Array dengan nama untai telah dideklarasikan dengan tipe integer, dengan jumlah elemen maksimum 50 elemen, nilai dari elemen array tersebut diatas harus bertipe integer.

Contoh Program :
Program Contoh_Array_Input;
Uses Crt;
Var
Bilangan : array[1..50] of Integer;
Begin
ClrScr;
Bilangan[1]:=3;
Bilangan[2]:=29;
Bilangan[3]:=30;
Bilangan[4]:=31;
Bilangan[5]:=23;
Writeln('nilai varibel bilangan ke 3 =',Bilangan[3]);
Readln;
End.

Array juga dapat dideklarasikan bersama dengan tipe yang beragam seperti contoh dibawah ini :
Program Contoh_Deklarasi_Array_Beragam;
Uses Crt;
Var
NPM : array[1..20] of string[10];
Nama : array[1..20] of string[25];
Nilai : array[1..20] of real;
Umur : array[1..20] of byte;
banyak,i : integer;
Begin
ClrScr;
Write('Isi berapa data array yang diperlukan :');Readln(banyak);
For i := 1 to banyak Do
Begin
Write('NPM =');Readln(NPM[i]);
Write('Nama =');readln(Nama[i]);
Write('Nilai=');readln(Nilai[i]);
Write('Umur =');readln(Umur[i]);
End;
{cetak varibel array}
Writeln('NPM NAMA NILAI UMUR ');
For i:= 1 to banyak Do
Begin
Writeln(Npm[i]:10,Nama[i]:25,Nilai[i]:3:2,' ',Umur[i]:3);
End;
Readln;
End.

Untuk deklarasi array dapat digunakan beberapa cara seperti berikut ini :
Type
Angka = String[20];
Var
Nama : Array [1..50] of Angka;
Begin
.
.
End.

Deklarasi tipe indeks subrange integer Indeks pada array dapat tipe skalar atau subrange, tetapi tidak bisa real.
Contoh:
Var
Nilai : Array[1..10] of Integer;
pada contoh ini array nilai mempunyai 10 buah elemen yaitu dari 1 sampai 10. Array tersebut dapat dideklarasikan dengan type seperti berikut ini :

Type
Skala = 1..10;
Var
Nilai : Array [skala] of Integer;
atau :
Type
Skala = 1..10;
Y = Array[skala] of Integer;
Var
Nilai : Y;
atau :
Type
Y = Array[1..10] of Integer;
Var
Nilai : Y;
atau :
Const
Atas =1;
Bawah = 5;
type
Y = Array[Atas..Bawah] of Integer;
Var
Nilai : Y;

I. Deklarasi Type Indeks Skalar
Indeks dari larik dapat berupa tipe skalar.
Contoh. :
Program Deklarasi_Indeks_Array_Skalar;
Uses Crt;
Var
Jum : Array[(jan,feb,mar,apr,mei)] of Integer;
Begin
Jum[jan]:=25;
Jum[feb]:=45;
Jum[mar]:=21;
Jum[apr]:=23;
Jum[mei]:=50;
Writeln('Jumlah nilai bulan maret =',Jum[mar]);
Readln;
End.
dapat juga ditulis :
type
Bln = (jan,feb,mar,apr,mei);
Var
Jum : Array[bln] of Integer;
atau :
type
Bln =(jan,feb,mar,apr,mei);
Var
Jum : Array[jan..mei] of Integer;

II. Deklarasi Konstanta Array
Array tidak hanya dapat berupa suatu varibel yang dideklarasikan di bagian deklarasi variabel, tetapi dapat juga berupa konstanta (const).
Contoh Program :
Program Contoh_Deklarasi_Array_Konstan;
Uses Crt;
Const
Tetap : Array[1..4] of Integer=(7,10,21,20);
Var
i : Integer;
Begin
For i:= 1 to 4 Do
Writeln('Nilai Konstan array ke ',i:2,' =',Tetap[i]);
Readln;
End.
konstanta array dapat juga berupa ketetapan dalam bentuk karakter seperti berikut.
Contoh Program :
Program Contoh_Konstan_Array_Char_;
Uses Crt;
Const
Huruf : Array[0..5] of Char=('A','B','C','D','E','F');
Var
i : Integer;
Begin
For i:= 0 to 5 Do
Writeln('Nilai konstan array ke',i:2,' = ',Huruf[i]);
Readln;
End.
Konstanta array dapat juga berupa string seperti berikut ini.
Contoh Program :
Program Constanta_Array_String;
Uses Crt;
Type
A = Array [1..5] of String;
Const
Nama : A = ('basic','pascal','cobol','paradox','dbase');
Var
i : Integer;
Begin
For i:= 1 to 5 Do
Writeln('Nilai Array ke-',i:2,'= ',Nama[i]);
readln;
end.

Dalam pascal string merupakan array dari elemen- elemen karakter seperti berikut :
Contoh Program :
Program String_Adalah_Array_Tipe_Char;
Uses Crt;
Var
Nama : string;
i : Integer;
Begin
Nama:='Turbo Pascal';
For i:= 1 to Length(nama) Do
Writeln('Elemen ',i,' dari ',Nama,'= ',Nama[i]);
Readln;
End.

contoh program bilangan prima dengan menggunakan bantuan array.
Contoh program :
Program Mencari_Bilangan_Prima_Dengan_Array;
Uses Crt;
Var
Prima : Array[1..100] of Integer;
i,j : Integer;
bil : Integer;
Begin
ClrScr;
For i := 2 to 100 Do
Begin
Prima[i]:=i;
For j:= 2 to i-1 Do
Begin
bil := (i mod j); {* i dibagi j dicek apakah 0*}
If bil = 0 then Prima[i]:=0; {*jika habis dibagi,berarti bkn prima*}
End;
If Prima[i]<> 0 Then Write(Prima[i],' '); {*cetak array yg prima*}
End;
Readln;
End.

Contoh pengurutan data dengan metode buble sort, yaitu dengan cara penukaran, dapat dilihat pada contoh dibawah ini :
Contoh Program :
Program Penggunaan_Array_Untuk_Sortir_Buble_Sort;
Uses Crt;
Var
nil1 : Array[1..100] of Integer;
n,i,j,dum : Integer;
Begin
ClrScr;
Write('mau isi berapa data acak (integer) ='); readln(n);
For i := 1 to n Do
Begin
Write('Data Ke ',i,':');Readln(nil1[i]);
End;
{* penyapuan proses}
for i:= 1 to n-1 do
begin
for j:= i to n do
begin
if nil1[j]begin
dum:=nil1[j];
nil1[j]:=nil1[i];
nil1[i]:=dum;
end;
end;
end;
writeln;
writeln('Hasil Sortir');
for i := 1 to n do
write(nil1[i]:3);
readln;
end.


III. Array Dua Dimensi
Di dalam pascal Array dapat berdimensi lebih dari satu yang disebut dengan array dimensi banyak (Multidimensional array), disini akan dibahas array 2 dimensi saja. Array 2 dimensi dapat mewakili suatu bentuk tabel atau matrik, yaitu indeks pertama menunjukkan baris dan indeks ke dua menunjukkan kolom dari tabel atau matrik.
1 2
1 2 3
Untuk mengetahui cara mendeklarasikan dari penggunaan aray dua dimensi dapat dilihat pada listing program dibawah ini .

Contoh Program:
Program Deklarasi_Array_Dua_Dimensi;
Uses Crt;
Var Tabel : Array[1..3,1..2] of Integer;
i,j : Integer;
Begin
ClrScr;
Tabel[1,1]:=1;
Tabel[1,2]:=2;
Tabel[2,1]:=3;
Tabel[2,2]:=4;
Tabel[3,1]:=5;
Tabel[3,2]:=6;
For I := 1 to 3 Do Begin For J:= 1 to 2 Do Begin Writeln('Elemen ',i,',',j,'= ',tabel[i,j]);
End;
End;
Readln;
End.


IV. Alternatif Deklarasi Array Dua Dimensi.
Ada beberapa cara dalam mendeklarasikan array dua dimensi, beberapa cara tersebut dapat dilihat dibawah ini :
Contoh :
Var
Tabel : Array[1..3] of Array[1..2] of Byte;
atau :
Type
Matrik = Array[1..3,1..2] of Byte;
Var
Tabel : Matrik;
atau :
Type
Baris = 1..3;
Kolom = 1..2;
Matrik = Array[Baris,Kolom] of Byte;
Var
Tabel : Matrik;
atau :
Type
Baris = 1..3;
Kolom=1..2;
Matrik= Array[Baris] of Array[Kolom] of Byte;
Var
Tabel : Matrik;
Dibawah ini akan diberikan listing program penggunaan array dua dimensi dalam aplikasi penjumlahan matrik :
Contoh Prorgam:
Program Penjumlahan_Matrik;
Uses Crt;
Var
Matrik1,Matrik2, Hasil : Array[1..3,1..2] of Integer;
i,j : Integer;
Begin
ClrScr;
{ input matrik ke satu }
Writeln(' Elemen matrik satu');
For i := 1 to 3 Do
Begin
For j := 1 to 2 Do
Begin
Write('Elemen baris -',i,' Kolom -',j,'= ');
Readln(matrik1[i,j]);
End;
End;
{input matrik ke dua}
Writeln('input elemen matrik dua');
For i:= 1 to 3 Do
Begin
For j:= 1 to 2 Do
Begin
Write('Elemen baris -',i,' kolom -',j,'= ');
Readln(matrik2[i,j]);
End;
End;
{proses penjumlahan tiap elemen}
For i := 1 to 3 Do
Begin
For j:= 1 to 2 Do
Begin
Hasil[i,j]:=Matrik1[i,j]+Matrik2[i,j];
End;
End;
{proses cetak hasil}
For i:= 1 to 3 Do
Begin
For j:= 1 to 2 Do
Begin
Write(Hasil[i,j]:6);
End;
Writeln;
End;
Readln;
End.


V. Array Sebagai Parameter
Array dapat digunakan sebagai parameter yang dikirimkan baik secara nilai (by value) atau secara acuan (by reference) ke procedure atau ke function. Procedure yang menggunakan parameter berupa array harus dideklarasikan di dalam judul procedure yang menyebutkan parameternya bertipe array.

Contoh Program :
Program Contoh_Pengiriman_Parameter_Array_Di_Procedure;
Uses Crt;
Const
Garis ='---------------------------------------------------';
Type
Untai = Array[1..10] of String[15];
Bulat = Array[1..10] of Integer;
Huruf = Array[1..10] of Char;
Var
i,Banyak : Integer;
Procedure Proses(Nama:Untai;Nilai:Bulat);
Var
Ket : String;
Abjad : Char;
Begin
Writeln(Garis);
Writeln('Nama Nilai Abjad Keterangan');
Writeln(Garis);
For i := 1 to Banyak Do
Begin
If Nilai[i] > 90 Then
Begin
Abjad:='A';
Ket :='Istimewa';
End;
If (Nilai[i]<90) And (Nilai[i]>70) Then
Begin
Abjad:='B';
Ket :='Memuaskan';
End;
If (Nilai[i]<70) And (Nilai[i]>60) Then
Begin
Abjad:='C';
Ket :='Cukup';
End;
If (Nilai[i]<60) And (Nilai[i]>45) Then
Begin
Abjad:='D';
Ket :='Kurang';
End;
If Nilai[i]< 45 Then
Begin
Abjad:='E';
Ket :='Sangat kurang';
End;
Writeln(Nama[i]:15,' ',Nilai[i]:4,' ',Abjad,' ',Ket:15);
End;
Writeln(Garis);
End;
Procedure Masuk_Data;
Var
Nama : Untai;
Nilai : Bulat;
Begin
Write('Banyak data =');Readln(Banyak);
For i:= 1 to Banyak Do
Begin
ClrScr;
Writeln('Data ke - ',i);
Write('Nama =');readln(Nama[i]);
Write('Nilai =');readln(Nilai[i]);
End;
Proses(Nama,Nilai);
End;
{modul Utama}
Begin
Masuk_Data;
Readln;
End. 

RIM Akan Keluarkan Blackberry Murah Curve

Reserch In Motion baru-baru ini memperkenalkan BlackBerry baru Curve 9920 dengan harga yang lebih terjangkau untuk mengembangkan pasar di India. RIM seperti mencoba membuntuti jejak pesaingnya, Google Android.

BlackBerry Curve 9920 baru merupakan upgrade dari versi murah BlackBerry sebelumnya dan akan segera diluncurkan di seluruh wilayah Asia. Curve 9920 sendiri hanya dilengkapi fitur dasar bila dibanding dengan smartphone yang dijual di AS, Kanada dan Eropa.

Smartphone ini menjalankan BlackBerry OS 7.1 dan dilengkapi dengan kamera 2 megapixel serta hanya beroperasi pada jaringan 2G. Namun, yang paling menarik dari smartphone ini ialah harganya yang cukup terjangkau. Smartphone akan dipasarkan dengan harga sekitar 215 USD dan khusus ditargetkan untuk menjangkau pasar negara-negara berkembang.

Hingga kini RIM harus berjuang keras untuk bersaing melawan Google Android dan Apple di pasar negara barat, namun mereka dapat mengatasinya dengan baik untuk pasar negara berkembang. Perusahaan kehilangan pangsa pasar cukup signifikan di AS karena iPhone dan perangkat Android berhasil menarik perhatian konsumen. Sedangkan bisnis RIM mengalami pertumbuhan di wilayah pasar seperti India, Indonesia, Malaysia dan Thailand serta pasar negara berkembang lain di Timur Tengah.



RIM sepertinya mencoba memperoleh kambali jalur bisnisnya di AS dan Kanada, sambil terus meningkatkan pertumbuhan di pasar negara berkembang. Sementara Curve 9920 merupakan upaya dalam bersaing dengan perangkat murah dari Android. Perangkat Android tersebut menawarkan pengalaman kaya aplikasi bagi pasar pelanggan yang tidak mampu menjangkau Apple iPhone. Sementara BlackBerry yang memiliki aplikasi dasar, tidak dapat menawarkan pengalaman yang sama seperti Android.

Namun perusahaan menyatakan, layanan BlackBerry Messenger (BBM) dan e-mail masih sangat populer di seluruh dunia. Layanan ini menuai kecaman dari beberapa negara dimana pihak berwenang menuntut akses terhadap kunci keamanan RIM. Bahkan beberapa tahun lalu, India, Arab Saudi serta beberapa negara lain sempat mengancam akan menutup RIM BlackBerry Enterprise Server

Postingan Yang Menarik Lainnya

Related Posts Plugin for WordPress, Blogger...

Share

Twitter Delicious Facebook Digg Stumbleupon Favorites More

 

Artikel Komputer Copyright © 2013 MyBlog Design