program Contoh_Tipe_Data;
var
Nilai_Akhir:Integer;
Nilai_Rata2:Real;
Grade:Char;
Keterangan:String[5];
Kondisi:Boolean;
Begin
Nilai_Akhir:=87;
Nilai_Rata2:=87.25;
Grade:='A';
Keterangan:='Lulus';
Kondisi:=True;
Writeln('Nilai Akhir Adalah',Nilai_Akhir);
Writeln('Nilai Rata-Rata Adalah',Nilai_Rata2);
Writeln('Gradenya adalah',Grade);
Writeln('Keterangannya Adalah',Keterangan);
Writeln('Kondisinya adalah',Kondisi);
end.
Tidak ada komentar:
Posting Komentar