penggunaan string pada pascal

uses crt ;
var
        NilaiString : string [10];
        NilaiReal : real;
        PosisiSalah : integer;
begin
        clrscr;
        NilaiString :='300.45';
        val(NilaiString,NilaiReal,PosisiSalah);
        writeln('Nilai String : ',NilaiString);
        writeln('NIlai Real : ',NilaiReal);
        writeln('Posisi Salah : ',PosisiSalah);
        readkey;

end.