Pascal:Manipulasi String Format Number: Difference between revisions

Line 107: Line 107:
*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;