Program Nilai

Jun 27, 2009 1 Comment by Sahabat

Program nilai ;
Uses crt ;
Var huruf : char ;
Begin
Write ( ‘ nilai yang didapat: ‘);readln (huruf) ;
Case huruf of
‘A’ : writeln (‘sangat baik’) ;
‘B’ : writeln ( ‘baik ‘) ;
‘C’ : writeln ( ‘cukup’) ;
‘D’ : writeln ( ‘kurang’ ) ;
‘E’ : writeln ( ‘gagal’ ) ;
End ;
Readln ;
End.

Pascal
Sahabat

Tentang Penulis

Penulis adalah sahabat-sahabat yg menyumbang tulisan di nusinau.com untuk dimuat dengan bijaksana. Silakan kirim tulisannya ke nusinau[at]gmail[dot]com atau ke admin[at]nusinau[dot]com. Butuh diskusi cepat? colek di twitter @nusinau

One Response to “Program Nilai”

  1. muhammad darmawan says:
    28 October 2012 at 03:28

    mas saya sudah bikin prog pascal lulus dan tidak lulus tapi error terus, tolong diberitahu salah dimana

Leave a Reply

You must be logged in to post a comment.