TUGAS 1 ALGORITMA PEMROGRAMAN (PROGRAM PENENTU GRADE NILAI)

Kali ini ane akan share program command prompt sederhana menggunakan bahasa pascal.
Dengan compiler Borland Delphi 7.

Cara 1
Algoritma :

1. Start
2. Masukkan nilai anda (n)
3. If n>=0 and n<=25 then grade ='E' If n>=26 and n<=55 then grade ='D' If n>=56 and n<=75 then grade ='C' If n>=70 and n<=85 then grade ='B' If n>85 then grade ='A'
4. Print grade
5. End

Coding :
copy dan paste kan script dibawah ini pada program console di Borland delphi 7. :
<br /> program cara1;<br /> <br /> {$APPTYPE CONSOLE}<br /> <br /> uses<br /> SysUtils;<br /> <br /> var<br /> n:integer;<br /> grade:char;<br /> begin<br /> <br /> writeln(' * (PROGRAM PENENTU GRADE NILAI) *');<br /> writeln;<br /> writeln;<br /> write(' masukkan nilai anda : '); readln(n);<br /> if (n>=0) and (n<=25) then grade:='E'; if (n>=26) and (n<=55) then grade:='D'; if (n>=56) and (n<=70) then grade:='C'; if (n>=71) and (n<=85) then grade:='B'; if (n>85) then grade:='A';<br /> writeln(' Grade anda adalah : ',grade);<br /> readln;<br /> end<br /> .end<br />
Hapus semua "« br /»" karena itu adalah tag html "break" untuk pindah baris atau enter.

berikut tampilan programnya :

Cara 2
Algoritma :

1. Start
2. Masukkan nilai anda (n)
3. If n>85 then grade = 'A' Else
If n>70 then grade = 'B' Else
If n>55 then grade = 'C' Else
If n>25 then grade = 'D' Else
grade = 'E';
4. Print grade
5. End

Coding :
copy dan paste kan script dibawah ini pada program console di Borland delphi 7 :
<br /> program cara2;<br /> <br /> {$APPTYPE CONSOLE}<br /> <br /> uses<br /> SysUtils;<br /> <br /> var<br /> n:integer;<br /> grade:char;<br /> begin<br /> <br /> writeln(' * (PROGRAM PENENTU GRADE NILAI) *');<br /> writeln;<br /> writeln;<br /> write(' masukkan nilai anda : '); readln(n);<br /> if (n>85)then grade:='A' Else<br /> if (n>70)then grade:='B' Else<br /> if (n>55)then grade:='C' Else<br /> if (n>25)then grade:='D' Else<br /> grade:='E';<br /> write(' Grade anda adalah : ',grade);<br /> readln;<br /> end<br /> <br /> .end<br />
Hapus semua "« br /»" karena itu adalah tag html "break" untuk pindah baris atau enter.

berikut Tampilan Programnya :

Okey Gan, Sekian dulu dari ane. Mohon maaf jika ada kekurangan.
Selamat mencoba n semoga berhasil. Hehehehehehe