Coding Pascal - GABUNGAN_MAX_DAN_RATA_RATA

/**
* Copyright (c) 2010 Alvin Aditya H
* GNU GPL License
*/

PROGRAM "GABUNGAN_MAX_DAN_RATA_RATA"
VAR
A : ARRAY [1..10] OF INTEGER;
I,J,K,MAX : integer;
TOTAL : INTEGER;
RATA2 : REAL;

Begin
FOR I := 1 TO 10 DO
begin
write('masukkan angka ',I,'= ');
READ(A[I]);
end;
MAX := A[1];
write('MAX = ');
FOR J := 2 TO 10 DO
IF MAX <= A[J] THEN MAX := A[J];
WRITELN(MAX);

Total := 0;
FOR K := 1 TO 10 DO TOTAL := TOTAL + A[K];
RATA2 := TOTAL / 10;
WRITELN('rata-rata= ',RATA2);
End.

READ MORE - Coding Pascal - GABUNGAN_MAX_DAN_RATA_RATA

Coding Pascal - Menampilkan rangkuman nilai

/**
* Copyright (c) 2010 Alvin Aditya H
* GNU GPL License
*
*
*/

uses crt;
type tabel=RECORD
kd:string[8];
mk:string[30];
sks:Integer;
n:char;
end;
var i : integer;
nama:string[20];
npm:string[8];
kelas:string[5];
aw:ARRAY[1..10]OF tabel;
tsks:integer;
mt:integer;
bobot:integer;
jmt:integer;
ipk:real;

BEGIN
clrscr;
tsks := 0;
jmt := 0;
writeln('masukkan Nama : ');readln(nama);
writeln('masukkan NPM : ');readln(npm);
writeln('masukkan Kelas : ');readln(kelas);
for i:=0 to 9 do
begin
writeln('masukkan kode : ');readln(aw[i].kd);
writeln('masukkan mata kuliah : ');readln(aw[i].mk);
writeln('masukkan sks : ');readln(aw[i].sks);
writeln('masukkan nilai(pake huruf gede) : ');readln(aw[i].n);
end;
writeln('Rangkuman Nilai Mahasiswa :');
writeln('---------------------------------------');
writeln('no| Kode | Mata Kuliah | SKS | Nilai |');
for i:=0 to 9 do
begin
writeln('|',i+1,'|',aw[i].kd,'|',aw[i].mk,'|',aw[i].sks,'|',aw[i].n,'|');
writeln('------------------------------------------------------------');
end;

for i:=0 to 9 do
tsks := tsks + aw[i].sks;
for i:=0 to 9 do
begin
case aw[i].n of
'A': bobot:= 4;
'B': bobot:= 3;
'C': bobot:= 2;
'D': bobot:= 1;
'E': bobot:= 0;
end;
mt := aw[i].sks*bobot;
jmt := jmt+mt;
end;
writeln('Total SKS yang diperoleh : ',tsks);
ipk := jmt/tsks;
writeln('Indeks prestasi kumulatif :',ipk);
readln;
END.

READ MORE - Coding Pascal - Menampilkan rangkuman nilai

Open source and free software is my choice

Yang tidak mengerti bhs.inggris, judul diatas artinya(Software sumber terrbuka dan software bebas adalah pilihanku)

Arti free software bukan berarti software gratis, melainkan software yang bebas dalam penggunaanya. Open source software berarti software yang kode sumbernya(koding) terbuka/boleh dilihat umum(public).
Open source dan free software harusnya bukan hanya menjadi pilihan saya seorang, melainkan juga harus menjadi pilihan semua masyarakat, untuk mencegah pembajakan.
Saat ini masih banyak orang yang menggunakan software bajakan. Untuk mengatasi hal ini free and open source software merupakan alternative. Misalnya mengganti Operating Sistem Windows dengan Linux yang free. Microsoft Office digganti dengan Open Office, Photoshop dengan Gimp, Corel Draw dengan Inkscape, dll.

Kalau masalah susah atau kesulitan dalam menggunakan software ini, ini hanya masalah kebiasaan dalam menggunakannya.

by alvin

READ MORE - Open source and free software is my choice

Etherape : a graphical network browser

Etherape dikembangkan oleh Juan Toledo, merupakan alat yang berfungsi untuk men-scan jaringan atau untuk membantu menganalisis jaringan. Etherape menampilkan aktivitas jaringan secara grafis. Host jaringan ditampilkan dalam gambar lingkaran dengan ukuran bervariasi sesuai dengan pengaturan "node size variabel" pada preferensi. Sedangkan lalu lintas antara host digambarkan dengan garis yang berwarna sesuai dengan jenis protokol yang digunakan. User dapat mengatur atau memilih mode protokol yang dipantau, seperti : ethernet, IP, TCP, Token Ring, FDDI. User dapat menampilkan window protokol melalui menu View. Window ini menyajikan keterangan yang lebih detail daari berbagai macam paket data yang tertangkap oleh etherape.

oleh alvin

READ MORE - Etherape : a graphical network browser

Netbeans 6.8

Bagi anda yang merupakan programmer JAVA pastinya sudah mengenal aplikasi yang satu ini. IDE (Integrated Development Environment) ini sangat populer dan merupakan ciptaan dari Sun Microsystem. Netbeans merupakan jawaban dari Sun Microsystem terhadap Eclipse yang merupakan IDE saingannya.

Netbeans merupakan IDE yang multifungsi dan juga mendukung banyak bahasa pemrograman selain JAVA. C/C++, PHP, Python, Ruby merupakan salah satu bahasa pemrograman yang didukung oleh Netbeans. Netbeans memiliki banyak fitur, diantaranya fitur Team yang berguna mensinkronisasikan source code local ke repository revision control. Beberapa revision control software yang didukung oleh Netbeans yaitu Kenai, CVS, Subversion, dan Mercurial. Beberapa fitur yang tak kalah penting yaitu source code refactoring, dan profiling.

Refactoring pada Netbeans cukup lengkap, hal ini membantu programmer untuk merename nama class, method atau variabel dengan cepat. Serta mengdeklarasikan variabel, method dan class secara akurat. Fitur Profiling pada Netbeans dapat digunakan untuk memantau aktifitas memori dan cpu di saat aplikasi JAVA yang dibuat dijalankan. Netbeans juga mendukung plugin untuk menambah fungsionalitas aplikasi.

oleh alvin

READ MORE - Netbeans 6.8