Vokale zählen in einer Textdatei (PASCAL)

  • Hallo
    ich soll in Pascal ein Programm erstellen, dass bei einer Datei die Vokale zählt.
    Ich weiß aber nicht genau wie ich die Datei einlesen kann.
    Das habe ich bereits, weiß aber nicht ob das überhaupt stimmt.


    PROGRAM vokale;
    CONST Vokale = ['A','E','I','O', 'U'];
    VAR AnzahlVokale, i : integer;
    VAR f: text;

    BEGIN
    AnzahlVokale := 0;
    Assign (f, 'Datei.text');
    FOR
    i := 1 to Length(f) do
    BEGIN
    IF Vokale in f THEN Inc(AnzahlVokale)
    END;

    WRITELN('Es sind 'AnzahlVokale' Vokale im Satz');
    END.


    Ich hoffe ihr könnt mir weiterhelfen.

    6 Mal editiert, zuletzt von sliceoflife (9. Februar 2014 um 16:39)