Помогите, пожалуйста!
Использовать mod и div.
Через ПАСКАЛЬ!!!
Написать программу, которая определяет, сколько раз буква "а" встречается в полученной от пользователя строке.
Не используй, пожалуйста: const, count.
Через Паскаль!

var a: String;sum,i: Integer;beginsum:=0;writeln('Введите текст');readln(a);for i:=1 to Length(a) dobeginif a[i]='а' then sum:=sum+1;end;writeln('Буква а встречается: ',sum,' раз(а)');end.