Program Pascal
PROGRAM DENGAN PENGGUNAAN VARIABEL
PROGRAM PENAMBAHAN
Program tambah;
Uses crt;
Var a,b:integer; mendeklarasikan variabel untuk angka pertam(a)dan angka kedua(b) yg berjenis integer
Hasil:integer; mendeklarasikan variabel “hasil” untuk menampung hasil dari penjumlahan a dan b
Begin
Clrscr;
Write(‘Masukkan angka pertama : ’); readln(a); menampilkan text dan membaca masukan sebagai variabel a
Write(‘Masukkan angka kedual : ’);readln(b); menampilkan text dan membaca masukan sebagai variabel b
Hasil:=a+b; memproses variable hasil dengan rumus a+b
Write(‘Hasil penambahan adalah : ‘,hasil); menampilkan hasil dari proses yg sudah dilakukan
Readln; memberhentikan sementara proses pembacaan program agar tidak langsung keluar dr layar
End.
PROGRAM PENILAIAN
Program nilai;
Uses crt;
Var nim,nama:string;
Utk,uak,tugas:integer; mendeklarasikan variabel yang digunakan
N_akhir:real;
Begin
Clrscr;
write(‘NIM :’);readln(nim); menampilkan text NIM dan memasukkan isiannya ke variabel nim
write(‘nama :’);readln(nama); menampilkan text NAMA dan memasukkan isiannya ke variabel nama
write(‘Nilai UTK : ‘);readln(utk);
write(‘Nilai UAK : ‘);readln(uak);
write(‘Nilai Tugas: ‘);readln(tugas);
N_akhir:=(0.2*utk)+(0.4*uak)+(0.4*tugas); memproses n_akhir dengan rumus yg sdh ditentukan
write(‘Nilai Akhir yang diperoleh adalah :’,N_akhir:10:2); memunculkan nilai akhir
readln; memberhentikan sementara proses pembacaan program agar tidak langsung keluar dr layar
end.
*:10:2 di belakang variabel n_akhir maksudnya à n_akhir yg berjenis real ditampilkan maksimal 10 digit dan 2 angka di belakang koma
Title : Program Mengenal Pascal (Program Penilaian)
Description : Program Pascal PROGRAM DENGAN PENGGUNAAN VARIABEL PROGRAM PENAMBAHAN Program tambah; Uses crt; Var a,b:integer; mendeklarasikan ...