Вся информация в компьютере хранится в двоичном виде. И в постоянной памяти (жёсткий диск, флешка, BIOS) и в оперативной памяти. Двоичный код представляет собой совокупность нулей и единиц, которые воспринимаются компьютером в зависимости от того, что он ожидает получить согласно алгоритму программы.
Например, одну и ту же последовательность нулей и единиц компьютер может обрабатывать и как символ А и как число 65 в зависимости от того, что ожидает увидеть программа.
Передача информации по сети или между элементами компьютера также выполняется в двоичном виде.
Этой программе все равно, сколько слов во фразе и какой они длины. А заодно, ей все равно, сколько между словами пробелов...
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 procedure Times(a:array of string; pic:string; var n:integer); begin n:=a.Where(s->s=pic).Count end;
begin var s:=ReadlnString('>').ToWords; var k:integer; var w:='ЗНАЧИТ'; Times(s,w,k); Println(k,'-',w); w:='ВОТ'; Times(s,w,k); Println(k,'-',w); w:='АВТОМОБИЛЬ'; Times(s,w,k); Println(k,'-',w); end.
Тестовое решение > ВОТ ЗНАЧИТ КАКОЕ ДЕЛО БЫЛО ЕХАЛ ПО ДОРОГЕ АВТОМОБИЛЬ И ВОТ СТОИТ ЧЕЛОВЕК И ДУМАЕТ А ЧТО ЗНАЧИТ СЛОВО АВТОМОБИЛЬ А СЛОВО АВТОМОБИЛЬ ЭТО ОТ ГРЕЧЕСКОГО АУТОС (САМ) И ЛАТИНСКОГО МОБИЛИС (ПОДВИЖНЫЙ) ВОТ ТАКОЕ ЭТО СЛОВО 2 - ЗНАЧИТ 3 - ВОТ 3 - АВТОМОБИЛЬ
Вся информация в компьютере хранится в двоичном виде. И в постоянной памяти (жёсткий диск, флешка, BIOS) и в оперативной памяти. Двоичный код представляет собой совокупность нулей и единиц, которые воспринимаются компьютером в зависимости от того, что он ожидает получить согласно алгоритму программы.
Например, одну и ту же последовательность нулей и единиц компьютер может обрабатывать и как символ А и как число 65 в зависимости от того, что ожидает увидеть программа.
Передача информации по сети или между элементами компьютера также выполняется в двоичном виде.
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
procedure Times(a:array of string; pic:string; var n:integer);
begin
n:=a.Where(s->s=pic).Count
end;
begin
var s:=ReadlnString('>').ToWords;
var k:integer;
var w:='ЗНАЧИТ'; Times(s,w,k); Println(k,'-',w);
w:='ВОТ'; Times(s,w,k); Println(k,'-',w);
w:='АВТОМОБИЛЬ'; Times(s,w,k); Println(k,'-',w);
end.
Тестовое решение
> ВОТ ЗНАЧИТ КАКОЕ ДЕЛО БЫЛО ЕХАЛ ПО ДОРОГЕ АВТОМОБИЛЬ И ВОТ СТОИТ ЧЕЛОВЕК И ДУМАЕТ А ЧТО ЗНАЧИТ СЛОВО АВТОМОБИЛЬ А СЛОВО АВТОМОБИЛЬ ЭТО ОТ ГРЕЧЕСКОГО АУТОС (САМ) И ЛАТИНСКОГО МОБИЛИС (ПОДВИЖНЫЙ) ВОТ ТАКОЕ ЭТО СЛОВО
2 - ЗНАЧИТ
3 - ВОТ
3 - АВТОМОБИЛЬ