7.3.. Napisati program koji odredjuje da li je zadani znak veliko ili malo slovo ili cifra, prema slijedećoj tabeli:

Listing programa:

PROGRAM Slovo_cifra;
USES
  WinCrt;
VAR
  a: Char;
BEGIN
  Writeln('Veliko ili malo slovo ');
  Write('Slovo ');
  Readln(a);
  CASE a OF
    'A'..'Z' : Writeln('Veliko slovo');
    'a'..'z' : Writeln('Malo slovo');
    '0'..'9' : Writeln('Cifra');
  END;
END.

Ispis na ekranu:

Index