Setelah mikir susah payah mao nulis apa dan ga ada ide juga mao bikin program baru akhirnya gw putuskan nyari diarsip lama gw. Setelah memilih dan menawar akhirnya dapat diputuskan bahwa program ini layak juga buat di publikasikan dan menurut gw ni program bisa juga dimanfaatkan buat orang banyak.

            Buat lo yang penasaran sama programnya langsung aja liat codingnya, jangan lupa ini coding untuk bahasa pemrograman pascal :

uses crt;

var

bil:integer;

begin

clrscr;

write(‘masukan nilai : ‘); readln(bil);

if (bil<=100)and(bil>=90) then

write(‘A’)

else if bil>=80 then

write(‘B’)

else if bil>=70 then

write(‘C’)

else if bil>=60 then

write(‘D’)

else

write(‘anda mengulang!’);

readln;

end.

            Itulah program yang gw bilang, kalo lo kecewa sama programnya sama gw juga kecewa, tapi ini semua buat tuntutan tugas softskill gw, harap dimaklumi.