Click Here World Of Warcraft, WoW Short Sword

Kamis, 21 Maret 2013

IF ELSE

  File  Edit  Search  Run  Compile  Debug  Tools  Options  Window  Help 15:41:28
╔═[■]════════════════════════════ dadada.pas:2 ════════════════════════════[↕]═╗
║program                                                                       ▲
║latihan34;                                                                    ▓
║var                                                                           ▓
║a:integer;                                                                    ▓
║begin                                                                         ▓
║ write('masukin nilai irfan ' );                                              ▓
║ readln(a);                                                                   ▓
║  IF(a>=75)THEN                                                               ▓
║  writeln('lulus')                                                            ▓
║ else                                                                         ▓
║  begin                                                                       ▓
║  if(a< 0)then                                                                ▓
║  writeln('masuk aja loe ke play group')                                      ▓
║  else                                                                        ▓
║  writeln('ngulang ajaloe dari sd');                                          ▓
║  end;                                                                        ▓
║  readln();                                                                   ▓
║end.                                                                          ▓
║                                                                              ▓
║                                                                              ▓
║                                                                              ▼
╚════════6:28 ◄■▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒►┘
 F1 Help  F2 Save  F3 Open  Alt+F9 Compile  F9 Make  Alt+F10 Local menu

jika ingin memasukan nilai dengan perbandingan ,maka harus menggunakan 'if'untuk membandingkan nilai yang kurang dari batas nilai atau nilai yang lebih dari batas


dan setelah else dan sebelum else tidak perlu menggunakan ';'

Tidak ada komentar:

Posting Komentar