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
   6   7   8   9   10   11   12   13   14   15   16