Pascal- sebuah kata yang memiliki makna tertentu dalam ilmu fisika dan jug pemograman. Dalam dunia pemograman pascal adalah salah satu jenis bahasa pemograman itu sendiri. Saat ini, untuk mempelajari pemograman dengan bahasa pascal bisa dengan menggunakan software Free Pascal, yang bisa didownload secara gratis di sini.

Sebagai pemula hhehe..(meskipun dulu waktu SMA pernah belajar tentang Pascal), tentu saja Saya masih harus banyak belajar. Dan salah satu cara belajar yang baik tentu saja dengan sering mencoba dan berlatih, dan kali ini latihannya adalah membuat program untuk menhitung standar deviasi.

Simpangan baku dan ragam merupakan istilah dalam ilmu statistika. Dalam statistika dan probabilitas, simpangan baku atau deviasi standar adalah ukuran sebaran statistik yang paling lazim. Singkatnya, ia mengukur bagaimana nilai-nilai data tersebar. Bisa juga didefinisikan sebagai, rata-rata jarak penyimpangan titik-titik data diukur dari nilai rata-rata data tersebut (Sumber). Bahasa gampangnya standar deviasi dan ragam itu digunakan untuk mengetahui keragaman dari sekumpulan data yang ada. Standar deviasi sendiri adalah akar kuadrat dari ragam/

Untuk mencari ragam bisa menggunakan rumus berikut:
sedangkan untuk mencari standar deviasi tinggal mengakar kuadratkan ragam, atau dengan rumus berikut:
rumus itu digunakan bila jumlah data (n) nya kecil, namun bila jumlah datanya besar, pembagi yang digunakan adalah n bukan n-1, tetapi nanti hasilnya tidak akan jauh berbeda.

Sebagai contoh, Saya akan menghitung ragam dari sekumpulan data tinggi badan 5 siswa dari kelas 1L, datanya sebagai berikut:

165 155 177 180 169

dan berikut ini adalah sourcecode untuk programnya:

program menghitung_standar_deviasi;
uses crt;
var
a,b,c,d,e,f,g,h,i,j,k,l,m:real;
begin
clrscr;
writeln('----------------------------------');read;
writeln('PROGRAM MENGHITUNG STANDAR DEVIASI');read;
writeln('----------------------------------');read;
write('A = ');read(a);
write('B = ');read(b);
write('C = ');read(c);
write('D = ');read(d);
write('E = ');readln(e);
f:=(a+b+c+d+e)/5;
g:=sqr(a-f);
h:=sqr(b-f);
i:=sqr(c-f);
k:=sqr(d-f);
l:=sqr(e-f);
m:=(g+h+i+k+l)/4;
j:=sqrt(m);
writeln('----------------------------------');read;
write('Rata Rata = ',f:5:5);readln;
write('Ragam = ',m:5:5);readln;
write('Standar Deviasi = ',j:5:5);readln;
readln;
end.

untuk informasi saja, pada script di atas Saya menggunakan fungsi sqr  untuk operasi kuadratik, dan sqrt  untuk operasi akar kuadratik. Operasi-operasi yang ada pada script Saya turunkan dari rumus manualnya. Adapun source code diatas apabila diketikkan dalam program free pascal dan akan nampak seperti ini

(gambar 1: tampilan script pada free pascal)

(gambar 2: tampilan script pada free pascal)

Oke, mungkin itu dulu untuk latihan kali ini, lain kali Saya akan coba bikin yang lain  tentunya. Sekian. -fm