Create readln.pas