Home » » Bagaimana Contoh Pembuatan Program Algolritma Pengimput Nilai

Bagaimana Contoh Pembuatan Program Algolritma Pengimput Nilai

Posted by DEC Development Education and Culture on Friday, 7 December 2012



program Nilai_Akhir ;
 
uses
winCrt ;
Var
mid,tugas,final,nilai:real;
 
begin
clrscr;
writeln ('masukkan nilai Tugas=');
readln (tugas) ;
writeln ('masukkan nilai Mid=') ;
readln (mid) ;
writeln ('masukkan nilai Final=') ;
readln (final) ;
nilai:=0.3*tugas+0.3*mid+0.4*final;
writeln ('Total Nilai=',nilai:4:2);
if
nilai>=80
then
writeln('Nilai Anda A (Tuntas)')
else if
nilai>=70
then
writeln('Nilai Anda B (Tuntas)')
else if
nilai>=60
then
writeln('Nilai Anda C (tuntas)')
else if
nilai>=50
then
writeln('Nilai Anda D (tidak tuntas)')
else
writeln('Nilai Anda E (tidak tuntas)')
End.


0 comments:

Post a Comment

RECENT POST

Popular Posts

Powered by Blogger.
.comment-content a {display: none;}