Page 11 - Microsoft Word - Modul pgds perulangan
P. 11
Modul Pemrograman Dasar Kelas X
Contoh program :
Program Lulus;
Uses crt;
Var nilai : Real;
Begin
Write ('Jumlah Nilai :'); Readln (nilai);
If nilai > 60 Then
begin
Writeln('Lulus');
End;
Readln;
End.
Hasil Running program :
Pada contoh diatas, kita akan mencetak kata "Lulus" jika nilai yang kita masukan
lebih dari 60. Jika tidak maka program tidak akan mencetak apapun.
SMK Antartika 2 Sidoarjo, Dinas Pendidikan Provinsi JawaTimur 2020 5