Adding simple read and write string pascal example