Питон
print(input().lower().count('a'))
Паскаль
begin
var s := readstring();
print(s.count(x -> x = 'A') + s.count(x -> x = 'a'))
end.
Объяснение:
