//Pascal ABC.NET 3.1 сборка 1219
Var
s:string;
k,i:integer;
begin
k:=0;
readln(s);
var ars:=s.Split;
for i:=0 to ars.Length-1 do
if (ars[i][1]='б') or (ars[i][1]='Б') then inc(k);
writeln(k);
end.
Пример ввода:
Большой бейсбольный мяч
Пример вывода:
2
Микропроцессоры характеризуются: тактовой частотой и разрядностью.
Ответ: г) 2 и 4
1КБайт = 8000Бит
2 минуты = 120 секунд
Значит, 3750КБайт = 30000000Бит
Значит скорость соединения была:
30000000:120 = 250000Бит/с
Ботинок надеть.Шнурок развязать.
Абрикос помыть.Косточку вытащить.
Дверь купить.Дверной замок открыть.