Perintah Konversi Tipe Data String

1. Konversi String Menjadi Numerik

     Perintah Val, mengkonversi string menjadi numerik. Perintah ini memiliki sintaks sebaga berikut :

Syntax : val(strvar,numvar,errorcode)

strvar adalah suatu variabel string yang akan di konversi. numvar adalah variabel integer atau real, dan errorcode adalah variabel integer yang akan berisi nilai kesalahan, jika berisi 0.

Contoh :

Var    s : string;    e : integer;    r : real; Begin    Write('Enter a number : '); readln(s);    val(s,r,e);    if e<>0 then      writeln('Error at position : ',e);    else      writeln('That was : ',r:4:3); end.

2. Konversi Numerik Menjadi String

     Perintah Str,digunakan untuk mengkonversi numerik menjadi string. Sintaksnya adalah sebagai berikut :

Syntax : (numvar,strvar)

Contoh : :

var    s : string;    i : integer; begin    write('Input an integer : '); readln(i);    str(i,s);    writeln('That was : ',s); end.

     Kode Program 4.6. Contoh Program Konversi Numerik  Menjadi String