Selasa, 24 Agustus 2010

Botak??





botak? skinhead? gundul? plontos? atau apapun lah, biasanya hal ini terjadi pada ospek mahasiswa baru, ya tentu saja hal ini sudah menjadi hal yang turun temurun dari leluhur seniornya tentunya. menyebalkan? ya tentu saja, terutama bagi seseorang yang memiliki bentuk kepala kurang baik atau memiliki tarang nong nong (seperti saya, haha).
Mungkin ini dapat dijadikan sebuah pengalaman, ya minimal 1x seumur hidup deh (bagi seorang yang tidak suka botak). Tetapi walaupun hanya 1x, beberapa orang juga tidak menerima itu, dengan terpaksa mereka mengikuti aturan dengan hati yang tidak ikhlas. yaa namanya juga peraturan (bersifat memaksa kalau kata pkn, tapi kalau kata saya peraturan itu bersifat membatasi). mau ga mau harus mau, itu yang terpikir di benak mereka.

Hmm... tapi apa ya sebenarnya esensi dari pembotakan masal itu?
rapi?
bersih?
keren?
ok?
atau apa sih?
berbagai jawaban yang diterangkan oleh senior tentang esensi dari pembotakan itu tidak pernah jelas mengena pada realita sesungguhnya. dan inti dari pembotakan itu yaa untuk asik2an aja sih, biar rame gitu. namanya juga ospek. kalau ga berkesan ya bukan ospek. bukankah begitu?
nah jadi kalau untuk mahasiswa baru sih wajar2 aja digituin, toh nantinya juga ketika mereka jadi senior, mereka bisa melakukan hal yang sama pada maba selanjutnya. iya kan?

tapi yang saya herankan sih kalau panitia juga harus botak? nah loh?
bukankah kalau panitia itu sudah mengorbankan jiwa, harta, dan tenaga mereka ya untuk menyusun acara sebaik mungkin. dan mereka perlu mengorbankan fisik pula? waduuuh kasian juga yaa. kayak militer aja mesti botak2an. hahaaa. demi ospek yang beberapa hari harus mengorbankan fisik untuk 1 tahun, haduuh2. kalau mahasiswa yang hidupnya cuma dikampus sih bisa menerima. tapi klo untuk yang hidupnya bukan hanya dikampus? misalnya dia foto model, artist, anak band, bintang iklan, atau apapun deh yang berbau entertainment. apakah mereka bisa menerimanya ya? yaa bisa sih mudah2an.

tapi sih kembali pada tradisi, kalau tradisi dulu kita begitu. ya smpai seterusnya begitu. itu mungkin kali ya yang membuat bangsa kita ga berubah2. yaa kita doakan saja deh.



[+/-] Selengkapnya...

Jumat, 16 April 2010

Steve Jobs, tokoh idola remaja AS

Steve Jobs yang merupakan pendiri sekaligus CEO Apple Inc. baru-baru ini telah menjadi figur pengusaha yang paling dikagumi remaja Amerika. Hasil survei terhadap 1000 remaja di USA menunjukkan bahwa Steve Jobs lebih digemari (35%) dibandingkan dengan oprah winfrey (25%) dan pendiri facebook Mark Zuckerberg (10%).
Mungkin ini karena kreativitas Steve Jobs yang membawa terobosan baru kedalam dunia teknologi, Apple merupakan pilar utama kesuksesan Steve Jobs yang membawa namanya bersanding dengan Bill Gates. Seni yang dituangkan Apple pada produk-produknya membuat sensasi baru dikalangan masyarakat (khususnya mereka yang sangat menyukai IT Fashion). Tetapi bukan itu saja, Steve pun meraih kesuksesannya pada bidang musik dan animasi Disney dan Pixar Animation Studio.

Berikut ini ialah pengalaman karier yang dia tempuh:
Apple Computer, Inc. (1997-sekarang)
NeXT Software akhirnya dibeli oleh Apple, dan Jobs pun kembali pada perusahaan yang telah membesarkan namanya itu.
Pixar Animation Studios (1986-sekarang)

NeXT Software Inc. (1986-1997)
Setelah hengkang dari Apple, Jobs mendirikan sebuah perusahaan dengan nama NeXT software
Apple Computer Inc. ( 1976-1986)
Di tahun 1986, setelah banyak menyebabkan masalah kepemimpinan di dalam Apple, Sculley memberhentikan Jobs dari jabatannya dan mengusirnya dari Apple.


[+/-] Selengkapnya...

Sabtu, 21 November 2009

Program bentuk & angka

Program ini sebenarnya bukan program bentuk dan angka, melainkan sebuah program yang meng-outputkan sebuah bentuk dan setiap komponennya merupakan sebuah nilai yang terurut. Duh, pokonya susah ngejelasinnya lah. jadi, soalnya seperti ini:
jika user meng-input angka 2, maka outputnya:
1
2 3

jika user menginput angka 5, maka outputnya:
1
2 6
3 7 10
4 8 11 13
5 9 12 14 15
nah, gitu programnya .
atau, gini deh bentuk pascalnya ,





hmmm.. lumayan agak sedikit menguras otak tuh, itu soal yang bikin saya gagal seleksi ProClub di IT Telkom .. hufh, akhirnya saya coba mengerjakan lagi dirumah, dan ternyata saya menemukan formulanya, dan itu ternyata cukup mudah. klo aja pas seleksi saya bisa, pasti saya lolos. hiks hiks..
eh, udah ah, ko malahan jadi curhat gini. haha. langsung aja ya .
ini source codenya (silakan di lihat dan dipahami):
program bentukangka;
uses wincrt;
function hitung(n,x:integer):integer;
var
i,z:integer;
begin
z:=0;
for i:=1 to x-1 do
begin
z:=z+n;
n:=n-1;
end;
hitung:=z;
end;
var
n,x,y:integer;
begin
write('Masukkan bilangan : ');readln(n);
for y:=1 to n do
begin
for x:=1 to y do
if x=1 then
write(y,' ')
else
write((y-(x-1))+hitung(n,x),' ');
writeln;
end;
readln;
end.
Nah setelah dipahami, coba deh buka turbo pascalnya . lalu dijalankan programnya.
pertama-tama yang harus kita lakukan apabila melihat soal seperti itu ialah :
1. istighfar (bcanda. hehe)
melihat bentuk tampilannya, bentuk di atas merupakan bentuk segitiga (klo mau tau tentang cara bikin bentuk download tutorial aneka bentuk dan gambar sederhana pada pascal disini)
2. coba buat aneka output untuk setiap inputan, lalu bandingkan apa persamaan dari semuanya. setelah itu ciptakan sebuah rumus.
3. bentuk algoritmanya .
*) kalo mau lebih jelas, silakan hubungi saya. ato ada yang mau bikin tim untuk kompetisi juga saya siap berpartisipasi.
Perluas persahabatan !! smangat !!

[+/-] Selengkapnya...

Minggu, 15 November 2009

Menggambar pola sederhana pada Pascal

Menggambar atau membuat pola sederhana pada pascal ataupun bahasa pemrograman lain dapat dilakukan dengan menggunakan perulangan/looping. Caranya ialah dengan memberikan perintah pada program untuk melakukan pengulangan penulisan karakter hingga membentuk sebuah pola. Perhatikanlah pola-pola sederhana yang dapat dibentuk dibawah ini:



Bentuk-bentuk diatas merupakan salah satu contoh pengembangan for-to-do pada turbo pascal.
untuk lebih memahami cara dan pembuatan serta algoritma dari program diatas maka download file tutorial dan source code nya disini

[+/-] Selengkapnya...

Jumat, 23 Oktober 2009

Adds-on/plug-in office 2007

Kali ini saya akan memposting beberapa plug-in untuk microsoft office 2007 .
Ada banyak sekali pulg-in office 2007 yang ditawarkan microsoft, tetapi saya cuma memberikan 3 saja yang menurut saya paling berguna. hehe.. ;)

1. Save as PDF and XPS

jika sahabat seorang penulis e-book atau tutorial, pasti sudah tidak asing lagi untuk mengubah format doc/docx kedalam format PDF. E-book/tutorial pastinya menggunakan format ini, Karena format PDF terlihat lebih profesional dan lebih sukar untuk diedit kembali. Nah, untuk office 2007 ini kita tidak perlu repot-repot lagi menginstall aplikasi converter docx to PDF., karena dengan plug-in office 2007 ini sahabat bisa langsung save to PDF.

Download Plug-in Save to PDF and XPS







2. Ubit Menu








Ubit menu merupakan plug-in untuk microsoft office 2007 agar tampilan menunya dapat seperti office 2003. Tetapi plug-in bukan disediakan oleh microsoft (ya iya lah, ngapain juga microsoft nyediain plug-in ginian. hehe).
Sebernarnya plug-in ini saya pakai karena.. hmmm.. kan ceritanya gini yaa..
waktu itu adik saya lagi kerjain tugas, dan kebetulan saya melihatnya seperti kebingungan mengotak-atik menu di office 2007. Lalu saya bertanya, "Kenapa de?". dia menjawab, "Kak, ini aku mau bikin drop caps gimana caranya? qo di buku aku beda ya?". dengan PDnya aku menjawab, "Oh, gampang de. bukunya kan itu office 2003 de, jadi beda, sini biar kakak yg bikin". Lalu dengan PDnya aku mencoba mengotak-atik. dan ternyata akhirnya aku tak dapat menemukan fasilitas drop caps itu. hahahahaaa.. jadi maluu . baru disitu aku ingat kata temanku gugun, yang menggunakan ubit menu untuk tampilan 2003. dengan segera aku minta pada pak google, dan akhirnya ia pun memberikannya. lalu aku install, dan semua problem drop caps itu selesai. hahaa.
"Tuh kan gampang de" ckckck.
*ko jadi curhat ya? haha
langsung aja deh unduh di sini

3. PPt Plex
PPt Plex ini digunakan untuk membuat presentasi dengan power point menjadi lebih profesional dan lebih indah. tetapi untuk menginstall aplikasi ini, kita harus menginstall terlebih dahulu Microsoft .NET Framework 3.0
download PPt Plex

[+/-] Selengkapnya...

Jumat, 09 Oktober 2009

Program bil. prima

Bilangan prima ialah bilangan yang tidak habis dibagi semua bilangan, kecuali dengan bilangan itu sendiri dan angka 1
Program ini akan menampilkan 'prima' jika user menginputkan bilangan prima, dan akan menampilkan 'bukan prima' jika user menginputkan selain bilangan prima.
*cat:dalam program ini saya hanya membatasi input angka sampai 100, jika anda ingin lebih, maka anda tinggal menambahkan sourcenya saja. hehe .
1. Tanpa menggunakan for
program bil_prima;
var
n:integer;
begin
readln(n);
if ((n=2)or(n=3)or(n=5)or(n=7))and(n<10)>
write('Prima')
else
if ((n mod 2<>0)and(n mod 3<>0)and(n mod 5<>0)and(n mod 7<>0)) then
write('Prima')
else
write('bukan prima');
readln;
end.

2. Menggunakan for-to-do
Membuat sebuah program bilangan prima dengan menggunakn for akan lebih mudah. Mengapa demikian? itu semua karena dengan menggunakan for-to-do kita dapat mengulang pembagian yang dilakukan oleh program.
program bil_prima;
var
i,c,n:integer;
begin
readln(n);
c:=0;
for i:=2 to n do
if (n mod i=0) then
c:=c+1;
if (c=1) then
write('Bilangan Prima')
else
write('bukan bilangan prima');
readln;
end.

[+/-] Selengkapnya...

Program tahun kabisat

Tahun kabisat ialah tahun yang habis dibagi 400 (contohnya tahun 2000) atau tahun yang habis dibagi 4 dan tidak habis dibagi 100 (contohnya tahun 2008).
atau kalo mau tahu lebih lanjut tentang tahun kabisat, baca aja di wikipedia.
Program tahun kabisat ialah program yang sangat sederhana, tapi kadang juga sedikit membingungkan, berikut ini akan saya berikan source code untuk program kabisat.
1. program kabisat menggunakan if then else
program kabisat;
var
n:integer;
begin
readln(n);
if (n mod 400=0) then
write('Kabisat')
else
if (n mod 4=0) and (n mod 100<>0) then
write('Kabisat')
else
write('Bukan kabisat');
end.

2. Program kabisat tanpa If (program ini akan menampilkan 'true' jika tahun yang diinputkan kabisat, dan akan 'false' jika tahun yang diinputkan bukan tahun kabisat)
program kabisat;
var
n:integer;
begin
readln(n);
writeln((n mod 400=0) or ((n mod 4=0) and (n mod 100<>0)));
end.

[+/-] Selengkapnya...