Var x, y: integer;
begin
readln(y);
x := 0;
if x>0 then (двоеточие не надо)
writeln(x, y);
end.
В качестве примера равномерного кода можно назвать ASCII-таблицу, где каждому из 256 символов сопоставлено двоичное значение от 00000000 до 11111111. Независимо от вероятности появления символа на его представление отводится 1 байт, или 8 бит. Как известно, национальные языки обладают большой избыточностью, то есть разницей между энтропией источника и максимально возможной энтропией, обусловленной равной вероятностью появления любого символа из алфавита. Например, избыточность русского языка составляет 70%, а английского – 50%. Это в частности означает, что некоторые буквы появляются в тексте гораздо чаще других и поэтому использовать равномерное кодирование нерационально.
При неравномерном кодировании часто встречающимся символам сопоставляются более короткие кодовые последовательности, редко встречающимся – более длинные. За счет этого удается значительно сократить объем файла без потерь информации. Существует несколько методов неравномерного кодирования, важнейших из которых является метод Шеннона-Фано.
Надеюсь понятно?
// PascalABC.NET
// Версия 3.4 сборка 1749 (18.08.2018)
Если места нумеруются с 1:
begin
ReadlnString.Select((i, j)-> (i, j + 1)).Where(t -> (t[1].IsOdd) and (t[1] mod 3 <> 0) and (t[0] = 'd')).Count.Println
end.
Если места нумеруются с 0:
begin
ReadlnString.Select((i, j)-> (i, j)).Where(t -> (t[1].IsOdd) and (t[1] mod 3 <> 0) and (t[0] = 'd')).Count.Println
end.
<span><span> if</span><span> <условие> </span>then<span> <оператор1> </span>else<span> <</span>оператор2>;</span><span><span> </span>(если) (то) (иначе)</span>
<span><span><span>2) </span>if</span><span> </span><условие><span> </span>then <оператор>;</span>
<span><span>(если) (то) </span>
</span>и не Paskal a pascal
А m[i] от 1 до 106 или от 1 до 10^6 ?
Вообще-то неизвестно, сколько поместится, если не знать:
1) Сколько места осталось в сумке
2) Размер самой большой матрешки
3) Учтите, что может быть несколько групп матрешек, например
(25, 20, 18, 10) и (20, 18, 15, 10, 8) и (10, 8, 5, 3)
И все три группы могут влезть в сумку независимо друг от друга.
И еще. Вы понимаете, что если матрешек 10000 и их размеры от 1 до 10000 мм,
то самая крупная имеет диаметр 10000 мм = 10 м и не поместится ни в какую сумку?