Wiki

Pascal:Manipulasi String Format Number: Difference between revisions

← Older editNewer edit →
Kangtain (talk | contribs)
Bureaucrats, Interface administrators, Suppressors, Administrators
9,206 edits
VisualWikitext
No edit summary
Line 3: Line 3:
*Sintaks:  
*Sintaks:  


<syntaxhighlight lang="pascal">
  CONCAT(s1 [,s2,...,sn]: String):  
  CONCAT(s1 [,s2,...,sn]: String):  
   
   
Line 10: Line 11:


  CONCAT('ABC','DEF') { ABCDEF }
  CONCAT('ABC','DEF') { ABCDEF }
</syntaxhighlight>


==Fungsi COPY==
==Fungsi COPY==
Line 18: Line 20:
*<code>Index</code> = posisi awal kita akan mengambil beberapa karakter (integer)
*<code>Index</code> = posisi awal kita akan mengambil beberapa karakter (integer)
*<code>Count</code> = banyaknya karakter yang akan diambil (integer). <code>COPY(“Semarang”,3,4)</code> → mara
*<code>Count</code> = banyaknya karakter yang akan diambil (integer). <code>COPY(“Semarang”,3,4)</code> → mara
==Prosedur DELETE==
==Prosedur DELETE==
*Menghapus sebagian karakter dari sebuah string.
*Menghapus sebagian karakter dari sebuah string.
Line 26: Line 29:
*<code>Count</code> = banyaknya karakter yang akan dihapus (integer).
*<code>Count</code> = banyaknya karakter yang akan dihapus (integer).
<code>Delete(“Semarang”,3,4)</code> → Seng
<code>Delete(“Semarang”,3,4)</code> → Seng
==Prosedur INSERT==
==Prosedur INSERT==
*Menyisipkan satu(1) atau beberapa karakter ke dalam sebuah string.
*Menyisipkan satu(1) atau beberapa karakter ke dalam sebuah string.
*Sintaks:
*Sintaks:


INSERT(Source,var S,Index);
<syntaxhighlight lang="pascal">
INSERT(Source,var S,Index);
</syntaxhighlight>


'''Keterangan:'''
'''Keterangan:'''
Line 37: Line 43:
*'''Index''' = posisi mulai (integer).
*'''Index''' = posisi mulai (integer).
<code>Insert(“Semarang”,“Atlas”,8)</code> → SemarangAltas
<code>Insert(“Semarang”,“Atlas”,8)</code> → SemarangAltas
===Contoh Program===
===Contoh Program===


<syntaxhighlight lang="pascal">
  program Fungsi_String;
  program Fungsi_String;
  uses CRT;
  uses CRT;
Line 60: Line 68:
   readln;
   readln;
  end.
  end.
</syntaxhighlight>
====Output====
====Output====
<syntaxhighlight lang="pascal">
  Sema Atlas
  Sema Atlas
  kangtain
  kangtain
  Kota
  Kota
  Kotaku Semarang
  Kotaku Semarang
</syntaxhighlight>


==Prosedur STR==
==Prosedur STR==
Line 70: Line 83:
*Sintaks:
*Sintaks:


STR(N,S);
<syntaxhighlight lang="pascal">
STR(N,S);
</syntaxhighlight>


'''Keterangan:'''
'''Keterangan:'''
Line 76: Line 91:
*<code>S</code> = data tipe string.
*<code>S</code> = data tipe string.


STR(50,data) → var data membawa
<syntaxhighlight lang="pascal">
STR(50,data) → var data membawa
</syntaxhighlight>


*nilai 50 bertipe String
*nilai 50 bertipe String
Line 84: Line 101:
*Sintaks:
*Sintaks:


CHR(N);
<syntaxhighlight lang="pascal">
CHR(N);
</syntaxhighlight>


'''Keterangan:'''
'''Keterangan:'''
Line 94: Line 113:
*Sintaks:
*Sintaks:


VAL(S,N,P);
<syntaxhighlight lang="pascal">
VAL(S,N,P);
</syntaxhighlight>


'''Keterangan:'''
'''Keterangan:'''
Line 108: Line 129:
*Sintaks:
*Sintaks:


Round(S);
<syntaxhighlight lang="pascal">
Round(S);
</syntaxhighlight>


'''Keterangan:'''
'''Keterangan:'''
*<code>S</code> = variabel bertipe pecahaan.
*<code>S</code> = variabel bertipe pecahaan.


<syntaxhighlight lang="pascal">
  Round(70.67) → 71
  Round(70.67) → 71
  Round(70.47) → 70
  Round(70.47) → 70
</syntaxhighlight>
===Contoh Program===
===Contoh Program===


<syntaxhighlight lang="pascal">
  program Fungsi_String;
  program Fungsi_String;
  uses CRT;
  uses CRT;
Line 138: Line 165:
   readln;
   readln;
  end.
  end.
</syntaxhighlight>
====Output====
====Output====
<syntaxhighlight lang="bash">
  45
  45
  ♥
  ♥
  76
  76
  75
  75
</syntaxhighlight>


==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
==Fungsi LENGTH==
==Fungsi LENGTH==
*Memberikan nilai panjang dari suatu string (jumlah karakterdalam string).
*Memberikan nilai panjang dari suatu string (jumlah karakterdalam string).
*Sintaks:
*Sintaks:


LENGTH(S);
<syntaxhighlight lang="pascal">
LENGTH(S);
</syntaxhighlight>


'''Keterangan:'''
'''Keterangan:'''
Line 156: Line 191:
*LENGTH(S) menghasilkan nilai integer.
*LENGTH(S) menghasilkan nilai integer.


Legth(“Semarang Atlas”) → 14
<syntaxhighlight lang="pascal">
Legth(“Semarang Atlas”) → 14
</syntaxhighlight>


==Fungsi POS==
==Fungsi POS==
Line 162: Line 199:
*Sintaks:
*Sintaks:


POS(Substr,S); {menghasilkan nilai Byte}
<syntaxhighlight lang="pascal">
POS(Substr,S); {menghasilkan nilai Byte}
</syntaxhighlight>


'''Keterangan:'''
'''Keterangan:'''
Line 168: Line 207:
*Bernilai 0 berarti nilai string yang dicari tidak ada.
*Bernilai 0 berarti nilai string yang dicari tidak ada.


Pos(“Semarang Atlas”, a) → 4,6, 13
<syntaxhighlight lang="pascal">
Pos(“Semarang Atlas”, a) → 4,6, 13
</syntaxhighlight>


==Fungsi UPCASE==
==Fungsi UPCASE==
Line 174: Line 215:
*Sintaks:
*Sintaks:


UPCASE(S);
<syntaxhighlight lang="pascal">
UPCASE(S);
</syntaxhighlight>


'''Keterangan:'''
'''Keterangan:'''
*<code>S</code> = variabel bertipe karakter.
*<code>S</code> = variabel bertipe karakter.


Upcase(“Semarang Atlas”) → SEMARANG ATLAS
<syntaxhighlight lang="pascal">
Upcase(“Semarang Atlas”) → SEMARANG ATLAS
</syntaxhighlight>


==Fungsi Randomize==
==Fungsi Randomize==
Line 185: Line 230:
*Syntac:
*Syntac:


Randomize(N);
<syntaxhighlight lang="pascal">
Randomize(N);
</syntaxhighlight>


'''Keterangan:'''
'''Keterangan:'''
*N = variabel bertipe Integer.
*N = variabel bertipe Integer.


Randomize (9) → hasilnya angka berapa tidak pasti (antara 0-9)
<syntaxhighlight lang="pascal">
Randomize (9) → hasilnya angka berapa tidak pasti (antara 0-9)
</syntaxhighlight>


[[Category:Pascal]]
[[Category:Pascal]]
[[Category:Logika dan Algoritma Pemograman]]
[[Category:Logika dan Algoritma Pemograman]]
Retrieved from "https://kangtain.com/wiki/index.php/Pascal:Manipulasi_String_Format_Number"