fpcdocs/sysutex/ex77.pp


1
2
3
4
5
6
7
8
9

Program Example77;

{ This program demonstrates the LowerCase function }

Uses sysutils;

Begin
  Writeln (LowerCase('THIS WILL COME out all LoWeRcAsE !'));
End.