Свойство алгоритма "конечность" по другому называется результативность и оно обозначает, что в результате выполнения заданных исполнителю шагов алгоритма мы получим результат.
Например, чтобы получить бутерброд с сыром и маслом (исходные продукты все есть), нужно проделать ряд действий:
1) взять кусочек хлеба
2)намазать хлеб маслом
3)отрезать кусочек сыра
4)положить сыр на бутерброд
Если предположить что исход охоты это всегда 100\% одна птица
То 1 бит. Истина - гусь, ложь - утка
Еще один бит на то что хоть кого то подстрелили либо полная неудача
Истина - подстрелили ; Ложь - охотники придут с пустыми руками
И того 2 бита
Если нужно кодировать и колличесво и разных птицтогда нужно придумать правило кодирования.
[колво гусей][колво уток]
[0..100][0..500]
100 = 1100100 = 7 бит
500 = 111110100 = 9 бит
<span>И того 7+9 = 16 бит</span>
Var
s:string;
i,n1,n2:integer;
begin
Write('Введите строку: '); Readln(s);
n1:=0; n2:=0;
for i:=1 to Length(s) do
case s[i] of
'*':Inc(n1);
'!':Inc(n2)
end;
Writeln('Найдено *: ',n1,', !: ',n2)
end.
<em><u>Тестовое решение:</u></em>
Введите строку: Это *просто *!* тестовая строчка!!!
Найдено *: 3, !: 4