Free Pascal Compiler version 1.0.6 [2002/04/23] for i386
Copyright (c) 1993-2002 by Florian Klaempfl
Target OS: Win32 for i386
Compiling c:\.....
contad~1.pas(21,30) Error: Illegal epresionje
contad~1.pas(21,30) Error: Ordinal epresionje expected
contad~1.pas(21,30) Fatal: Syntax error, : expected but const char found

Program Contador_vocales;

var

   Contador_A:integer;             //Un contador para cada vocal
   Contador_E:integer;
   Contador_I:integer;
   Contador_O:integer;
   Contador_U:integer;

Letra:char;                     //Para almacenar las palabras letra x letra

BEGIN
        Letra:='z';
        while Letra <> '.'do
                BEGIN
                        read (Letra);
                        write (Letra);
                        case Letra of
                        BEGIN
ACA EL ERROR!!!    'A': Contador_A:=Contador_A+1;
                             'a': Contador_A:=Contador_A+1;
                             'E': Contador_E:=Contador_E+1;
                             'e': Contador_E:=Contador_E+1;
                             'I': Contador_I:=Contador_I+1;
                             'i': Contador_I:=Contador_I+1;
                             'O': Contador_O:=Contador_O+1;
                             'o': Contador_O:=Contador_O+1;
                             'U': Contador_U:=Contador_U+1;
                             'u': Contador_U:=Contador_U+1;
                        END
                END

        write('Cantidad de vocales A:',Contador_A);
        write('Cantidad de vocales E:',Contador_E);
        write('Cantidad de vocales I:',Contador_I);
        write('Cantidad de vocales O:',Contador_O);
        write('Cantidad de vocales U:',Contador_U);

END