StrPcopy strpcopy StrPCopy strPcopy StrCat strcat strCat Uses Pchar pchar strPas StrPas longint case strcpy uses and array asm begin case cdecl classchar const constructor default destructor div do downto else end end. except exit exports external far file finalization finally for function goto if implementation in index inherited initialization inline interface label library message mod near nil not object of on or out overload override packed pascal private procedure program property protected public published raise read rewrite record file close assign reset register repeat resourcestring safecall set shl shr stdcall stored string then threadvar to try type unit until uses var virtual while with write xor real extended integer string END. boolean exit Exit Halt halt HALT repeat Repeat readln clrscr BEGIN Begin End OR AND Or And Procedure Function Implementation implementation Program true false writeln abs sin cos tan atan sqr ln exp round trunc str string Begin End pi sqrt val str