Pascal:Manipulasi String Format Number: Difference between revisions

Line 106: Line 106:
*Untuk membulatkan bilangan pecahan , jika pecahan di atas 50 di bulatkan ke atas, jika kurang dari 50 di hilangkan pecahannya.
*Untuk membulatkan bilangan pecahan , jika pecahan di atas 50 di bulatkan ke atas, jika kurang dari 50 di hilangkan pecahannya.
*Sintaks:
*Sintaks:
{{Code|Pascal}}
  Round(S);
  Round(S);
'''Keterangan:'''
'''Keterangan:'''
*<code>S</code> = variabel bertipe pecahaan.
*<code>S</code> = variabel bertipe pecahaan.
{{Code|Pascal}}
  Round(70.67) → 71
  Round(70.67) → 71
  Round(70.47) → 70
  Round(70.47) → 70
===Contoh Program===
===Contoh Program===
{{Code|Pascal}}
  program Fungsi_String;
  program Fungsi_String;
  uses CRT;
  uses CRT;
Line 138: Line 142:
  76
  76
  75
  75
==Exit dan Halt==
==Exit dan Halt==
Untuk memaksa keluar dari sebuah aplikasi program yang sedang dijalankan dalam pascal
Untuk memaksa keluar dari sebuah aplikasi program yang sedang dijalankan dalam pascal