Rizq Technology – Exploring Your iDea.

All about My Experiences, Knowledge and Thoughts.

Script untuk mencari posisi salah ada di mana.

Script untuk mencari posisi salah ada di mana.

uses wincrt;
var
nilaistring:string[6];
nilaireal1:real;
posisisalah:integer;
begin
NilaiString:=’123.A5′;
Val(NilaiString,Nilaireal1,PosisiSalah);
writeln(‘nilaistring:’,nilaistring);
writeln(‘NilaiReal1:’,NilaiReal1:8:2);
writeln(‘posisisalah:’,posisisalah);
end.

Categories: Pascal