KONTEN

Kamis, 28 Juli 2011

PASCAL: rumus standar deviasi

program standar_deviasi;

var

sd,rata,banyak_data,angka1,angka2,angka3,angka4:integer;

begin

writeln('masukan nilai pertama :');

readln(angka1);

writeln('masukan nilai kedua :');

readln(angka2);

writeln('masukan nilai ketiga:');

readln(angka3);

writeln('masukan nilai keempat:');

readln(angka4);

writeln('masukan banyak data:');

readln(banyak_data);

writeln('rata-ratanya adalah: ',(angka1+angka2+angka3+angka4)/banyak_data);

sd:=((angka1-rata)*(angka1-rata)+(angka2-rata)*(angka2-rata)+(angka3-rata)*(angka3-rata)+(angka4-rata)*(angka4-rata)) div banyak_data;

writeln ('standar deviasinya adalah:', sqr(sd));

readln;

end.

Jumat, 22 Juli 2011

Pascal

dalam pascal terdapat istilah COMPILE, nah istilah itu gunannya buat nge cek gitu..udah bener belom logika kita,,nah kalo udah pas di compile akan ada tulisan "compile is succesful:press any key" dijamin dah kalo berhasil ngecompile kamu bisa loncat"an gitu(pengalaman pribadi,hehehe)
nah tapi kalo ada tulisan ERROR(ini sering banget keluar dulu pas gue baru pertama kali belajar pascal),jangan putus asa untuk memperbaikinya,,
untuk ngecek kesalahan dalam syntac(bahasa pemrogramannya) pencet esc+enter
nah tar akan dikasih tau dimana salahnya,,,