Cara Mencari nilai rata-rata menggunakan pascal

baikalah sekarang kita coba lihat contoh mencari nilai rata2 ,,,
cekedot..

uses wincrt;
var
nama,nim:string;
nt,nmt,na:integer;
nr :real;

begin
writeln ('        DAFTAR NILAI MAHASISWA');
write ('Nama  : ');
readln (nama);
write ('NIM   : ');
readln (nim);
write ('Nilai Tugas      : ');
readln (nt);
write ('Nilai Mid Test   : ');
readln (nmt);
write ('Nilai Akhir      : ');
readln (na);

nr:=(0.5*nt)+(0.25*nmt)+(0.25*na);

writeln ('Rata-rata      : ',nr:0:2);
end.

nah yg terpenting untuk pascal ini seringlah dilatih..

You May Like :

Share on Facebook

Share on Twitter

Share on Google+

Share on LinkedIn