SHOPPING CART

close

Pascal – Menghitung Nilai Rata-Rata Kelas


Hai teman-teman, sekarang saya juga akan mulai berbagi tutorial di YouTube.
Channel : https://youtube.com/c/wiraloksado
Jangan lupa juga bergabung di grup FB "Android TV dan STB"

Script Pascal berikut adalah aplikasi yang akan melakukan perhitungan nilai rata-rata kelas, statemen while do akan mengakibatkan perulangan secara terus menerus. Untuk berhenti menginput data, isikan No. Induk dengan karakter ‘xx’, tanpa tanda kutip. Selamat Mencoba!

Program data_siswa;
Uses Wincrt;
Var
No_Siswa:String[5];
B_Data,J_Data,Nilai,Bil:Integer;
Rata:Real;
Begin
Writeln;
Writeln(' Program Penghitung Nilai Rata-Rata Kelas');
Writeln(' ----------------------------------------');
Writeln;
Writeln (' Jumlah Data Yang Sudah Masuk : ',B_Data);
Writeln;
Write(' No. Induk : ');
Readln (No_Siswa);
Write(' Nilai : ');
Readln (Bil);
Nilai:=0;
B_Data:=0;
Clrscr;
While No_Siswa <> 'xx' do
Begin
B_Data:=B_Data+1;
Nilai:=Nilai+Bil;
Writeln;
Writeln(' Program Penghitung Nilai Rata-Rata Kelas');
Writeln(' ----------------------------------------');
Writeln;
Writeln (' Jumlah Data Yang Sudah Masuk : ',B_Data);
Writeln;
Write(' No. Induk : ');
Readln (No_Siswa);
Write(' Nilai : ');
Readln (Bil);
Clrscr;
End;
Rata := Nilai/B_Data;
Writeln;
Writeln(' Hasil Perhitungan Nilai Rata-Rata Kelas');
Writeln(' ---------------------------------------');
Writeln;
Writeln (' Jumlah Data = ',B_Data);
Writeln (' Nilai Total = ',Nilai);
Writeln (' Rata-rata = ',Rata:5:2);
End.


DMCA.com Protection Status
Artikel ini dilidungi oleh DMCA Takedown Services & Website Content Protection. Dilarang Copy-Paste.
Yang mau ngajakin ngopi silahkan klik

Sekarang saya juga akan mulai berbagi tutorial di YouTube.
Channel : https://youtube.com/c/wiraloksado
Jangan lupa juga bergabung di grup FB "Android TV dan STB"
Like kami di Facebook dengan menekan tombol "Suka" di bawah ini agar tetap update informasi terbaru:
Tags:

19 thoughts on “Pascal – Menghitung Nilai Rata-Rata Kelas

  • lukman

    pak k’ g bsa d jlankn walaupun di akhri xx,,,,,,,,?
    n ylong bwtkan program menghitung rata-rata, simpangan baku dan varians yang jdi satu program

  • erektionsst√∂rung

    … [Trackback]

    […] Find More on|Find More|Find More Infos here|Here you will find 55739 additional Infos|Infos on that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • visit homepage

    … [Trackback]

    […] Read More here|Read More|Read More Infos here|Here you will find 7992 additional Infos|Infos to that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • Bdsm

    … [Trackback]

    […] Find More on|Find More|Find More Informations here|There you can find 74074 more Informations|Informations on that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • must watch

    … [Trackback]

    […] Find More here|Find More|Read More Infos here|Here you will find 84619 more Infos|Infos on that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • TS Escorts

    … [Trackback]

    […] Read More on|Read More|Find More Informations here|Here you can find 49710 more Informations|Informations to that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • More Info

    … [Trackback]

    […] Find More here|Find More|Find More Informations here|Here you will find 81030 more Informations|Infos on that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • St George Utah Real Estate

    … [Trackback]

    […] Find More here|Find More|Find More Infos here|Here you will find 20090 more Infos|Infos to that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • wiet hash kopen Nederland

    … [Trackback]

    […] Read More here|Read More|Find More Informations here|Here you will find 89236 additional Informations|Infos on that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • Geruchsentferner

    … [Trackback]

    […] Find More on|Find More|Read More Informations here|Here you can find 21717 more Informations|Informations to that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • ?????????, ???????????, ??????, ??????....

    … [Trackback]

    […] Find More here|Find More|Read More Informations here|Here you will find 42562 additional Informations|Infos to that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • boot camp equipment

    … [Trackback]

    […] Read More here|Read More|Read More Infos here|Here you will find 65621 additional Infos|Infos on that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • furnace service vancouver

    … [Trackback]

    […] Read More here|Read More|Read More Informations here|There you will find 1430 additional Informations|Infos to that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • http://www.funnelmode.com

    … [Trackback]

    […] Read More here|Read More|Read More Informations here|There you can find 31673 more Informations|Infos to that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • Bermuda Triangle mystery in Hindi

    … [Trackback]

    […] Find More on|Find More|Read More Infos here|Here you can find 90712 more Infos|Infos on that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • lose weight plate

    … [Trackback]

    […] Read More here|Read More|Find More Infos here|There you will find 55985 additional Infos|Infos on that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • what is NFL game pass

    … [Trackback]

    […] Read More on|Read More|Find More Informations here|There you can find 89675 additional Informations|Infos on that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • make money with a iphone

    … [Trackback]

    […] Read More here|Read More|Find More Informations here|Here you will find 46074 additional Informations|Infos to that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

  • Stix Events Hyderabad

    … [Trackback]

    […] Read More here|Read More|Find More Infos here|Here you will find 57348 additional Infos|Informations on that Topic: blog.loksado.com/pascal-menghitung-nilai-rata-rata-kelas […]

Mari Berdiskusi

Cari Artikel

Chat via WA
1
Kontak WA hanya untuk donatur, tanya jawab silahkan gunakan kolom komentar pada akhir artikel.