Задача на Строковые величины

[Игорь Милосердов]

Определить, сколько раз в тексте встречается буква А.

Пожалуйста помогите!!

[Hacker19_90]

и чем же вам помочь?

[VIK_aka_TOR]

если ручной ввод то такой пример:

readln(tekst);
index:= 0;
for i:=1 to length(tekst) do
if tekst[i] = 'a' then
inc(index); // или же index:= index+1; коль не знаешт inc()
writeln('символ А в тексте встречается раз: ', index);

index и i числовые stroka - стринговкая

[Игорь Милосердов]

Мне в файле это надо сделать

[VIK_aka_TOR]

значит считывай через файл переменную tekst... если одна строка... то ничего модифицировать не нужно... если на несколько расчитано, то все это (естественно кроме index:=0) запихнуть дополнительно в цикл while not EOF(f) do
вроде так пишется цикл на чтение до конца файла.... с eof поищи... а так весь принцип тебе уже написан... если совсем туго то за символическое вознаграждение тебе все подробно опишу , напишу и разъясню в аське... ) или личке)

[Игорь Милосердов]

Я дуб дубом в этом деле))) мне бы целиком задачу

[VIK_aka_TOR]

если совсем туго то за символическое вознаграждение тебе все подробно опишу , напишу и разъясню в аське... ) или личке)

обращайся... будем рады... своеобразно ерепетиторство)