Nah sekarang faro ngepost tentang tugas membuat program untuk mencari rata rata dan ragam data dengan pascal.
Ok langsung saja ini source codenya, copy paste saja di program dev pascal (pascal compiler).
untuk algoritmanya, bisa dilihat dari struktur source code itu.
semoga artikel ini bermanfaat.
Ok langsung saja ini source codenya, copy paste saja di program dev pascal (pascal compiler).
program reratadanragam;disini faro menggunakan tipe data real karena ragam biasanya kan dalam desimal..
uses crt;
var
i,datamax:integer;
jmldata,newdata,rerata,ragam:real;
data:array [1..100] of real;
begin
jmldata:=0;
writeln('program mencari rerata dan ragam');
write('input banyak data (maksimal 100 data): ');
readln(datamax);
for i:=1 to datamax do
begin
write('masukkan data ke-',i,' : '); readln(data[i]);
jmldata:=jmldata + data[i];
end;
rerata:=jmldata/datamax;
newdata:=0;
for i:=1 to datamax do
begin
newdata:=newdata + (data[i]-rerata)*(data[i]-rerata);
end;
ragam:=newdata/datamax;
writeln('dari data yang telah diinputkan');
writeln('didapatkan rerata sebesar : ', rerata:4:2);
writeln('dan ragam sebesar : ', ragam:4:2);
readln;
end.
untuk algoritmanya, bisa dilihat dari struktur source code itu.
semoga artikel ini bermanfaat.
Post link : http://www.blognafaro.com/2013/10/Pascal-Source-Code-Program-Mencari-Rata-Rata-dan-Ragam-Data.html
Pascal : Source Code Program Mencari Rata - Rata dan Ragam Data
Ringkasan :
faro ngepost tentang tugas membuat program untuk mencari rata rata dan ragam data dengan pascal. Ok langsung saja ini source codenya, copy paste saja di program dev pascal (pascal compiler).
.
Jumlah Kata : | Dipublikasikan pada Monday, October 14, 2013
Jumlah Kata : | Dipublikasikan pada Monday, October 14, 2013