http://pascalcyber.blogspot.com/2008/04/fungsi-fungsi-string-pada-pascal.html