ord string op

Smart pascal source code


var a := '123 ABC';
var i: Integer;

for i := Low(a) to High(a) do
  WriteLn(Ord(a[i]));

{<<< RESULT - CONSOLE LOG >>>
-----------------------------
49
50
51
32
65
66
67

-----------------------------
{<<<<<<<<< THE END >>>>>>>>>}

var a = "",
   i = 0;

/* <<< main JS >>> */

   a = "123 ABC";
   var $temp1;
   for(i=1,$temp1=a.length;i<=$temp1;i++) {
      WriteLn($SCodeIdx(a,i,""));
   }