2 в 20 степени бит=128 Кб
байт- 2 в 3 ст.
кило (1024) - 2 в 10 ст
20-13=7
2 в 7 ст.=128
Итог выше
Никак. пиши на английском. если хочешь, чтобы была возможность писать на русском, то качай pascal abc
Var a: String;
sum,i: Integer;
begin
sum:=0;
writeln('Введите текст');
readln(a);
for i:=1 to Length(a) do
begin
if a[i]='а' then sum:=sum+1;
end;
writeln('Буква а встречается: ',sum,' раз(а)');
end.