program kalkulatorstatistika;
uses wincrt;
var
a,b,c,d:integer;
e,f,g:real;
i,n:integer;
sum1:integer;
data:array [1..100] of integer;
x,y:integer;
rata,selisih,varian,sum2,sum3:real;
data1:array [1..100] of real;

begin
clrscr;
repeat
writeln('.........SELAMAT DATANG..........');
writeln;
writeln('.........diprogram kalkulator statistik................');
writeln;
writeln('anda dipersilahkan untuk memilih operasi hitungan yang diinginkan...');
writeln('silahkan memilih pilihannya');
writeln('1.penjumlahan +');
writeln('2.pengurangan -');
writeln('3.perkalian *');
writeln('4.pembagian /');
writeln('5.mencari mean');
writeln('6.mencari varians');
writeln('7.keluar');
writeln;
writeln('**************');
writeln;
writeln;
writeln('silahkan anda memilih operasi yang anda inginkan...');
readln(a);
clrscr;
case a of

1:begin
writeln('masukan angka :');readln(b);
writeln('masukan angka :');readln(c);
d:=b+c;
writeln('hasil penjumlahan =',d);readln;
end;
2:begin
writeln('masukan angka :');readln(b);
writeln('masukan angka :');readln(c);
d:=b-c;
writeln('hasil pengurangan =',d);readln;
end;
3:begin
writeln('masukan angka:');readln(b);
writeln('masukan angka:');readln(c);
d:=b*c;
writeln('hasil perkalian =',d);readln;
end;
4:begin
writeln('masukan angka:');readln(e);
writeln('masukan angka:');readln(f);
g:=e/f;
writeln('hasilpembagian =',g);readln;
end;
5:begin
sum1:=0;
write('berapa banyak data yang anda ingin masukkan?');readln(n);
writeln('silahkan memasukan data...');
i:=1;
repeat
write('data ke-',i,' ');
readln(data[i]);
inc(i);
until i>n;
i:=1;
repeat
sum1:=sum1+data[i];
inc(i);
until i>n;
write('rata-ratanya =');
writeln(sum1/n);
end;
6:begin
sum2:=0;
write('berapa banyak data yang anda masukkan?');readln(y);
writeln('silahkan memasukan data...');
x:=1;
repeat
write('data ke-',x,' ');
readln(data[x]);
inc(x);
until x>y;
x:=1;
repeat
sum2:=sum2+data[x];
inc(x);
rata:=sum2/y
until x>y;
x:=1;
repeat
selisih:=sqr(data[x]-rata);
sum3:=sum3+selisih;
inc(x);
varian:=sum3/(y-1);
until x>y;
writeln('variannya =',varian);
end;
end;
writeln('************');
writeln;
writeln('..........terima kasih..........');
writeln;
writeln('************');
readln;
until a=7 
end.

Artikel ini adalah seri pertama dari artikel berseri tentang OOP. Tentu saja OOP pada PHP. OOP adalah singkatan dari Object Oriented Programming, dalam bahasa jawanya pemrograman berorientasi objek, yaitu mengganggap bahwa segala sesuatu dalam bahasa pemrograman adalah object, benda seperti dalam dunia nyata. Bahkan variable pun bisa dianggap sebagai object (pada pemrograman yang OOP banget, macam java, javascript). Sekarang PHP mulai versi 5.x sudah mendukung secara penuh konsep OOP. Pada versi 4.x memang kita sudah bisa menggunakan OOP, tetapi core engine PHPnya sendiri belum begitu mensupportnya. Jadi jika anda ingin menggunakan konsep OOP dalam konstruksi logic web anda, lebih baik gunakan PHP versi 5.x. Saat ini sudah banyak hosting yang sudah mengupgrade versi PHPnya.

OOP dalam PHP hampir mirip dengan OOP pada java. Jika anda sudah pernah belajar java atau javascript, OOP dalam PHP tidak begitu bermasalah. OOP PHP berbeda dengan PHP struktural. Pada OOP kita bisa membuat sebuah class yang berisi semua fungsi-fungsi yang biasa digunakan untuk proses web, misalkan proses query database, proses login, proses regular expression dll.Ingat bahwa fungsi dalam OOP adalah method. Dari class tersebut bisa dibuat sebuah object yang memiliki semua method yang saya sebutkan tadi, proses query, proses login, proses reqular expression dll. Tambahan lagi, dengan menggunakan OOP, pembuatan program menjadi lebih mudah dan cepat begitu juga konsistensi program akan terjaga. Anda juga bisa membuat template web dengan menggunakan OOP dimana ada method yang bertugas untuk membuat tampilan, misalkan tampilan header, sidebar, footer dll.

Pada artikel selanjutnya saya akan membahas teknis dari OOP, contoh script OOP dan aturan singkat dalam OOP-PHP.