<span>1 кб=1024 б
</span><span>1 мб=1024 кб=1048576 байт
</span><span>1Гб=1024 мб= 1048546
</span><span>кб=1073741824 кб</span>
Мы знаем что у нас нечетное число букв, причем что нечетность приходится на букву Б (7)
Все палиндромы длиной во все буквы
Тогда каждый палинром имеет такую схему:
[некий набор альфа]Б[альфа в обратном порядке]
Разных альф может быть тоже 35 и состоит из половины букв Ч и (7-1)/2 = 3 букв Б
Обозначим все колво букв Ч = 2x, а половину - х
Значит у нас тут Перестановки с повторениями, колво которых 35
35 = (x+3)! / (x!3!)
35 * 3! = (x+3)(x+2)(x+1)
7 * 5 * 3 * 2 = (x+3)(x+2)(x+1)
можно представить так
7 * 6 * 5 = (x+3)(x+2)(x+1)
очевидно что 7 = х + 3 т.е. х = 4
А букв Ч = 2х = 2 * 4 = 8
Надеюсь понятно
Е-0, П-1, Н-2, Ч-3, Ь-4. Сначала находим двоичные коды чисел(переводим эти числа из десятичной системы счисления в двоичную. Там, где после перевода остается только одна цифра, впереди приписываем ноль). Таким образом, получим:
Е-00, П-01, Н-10, Ч-11, Ь-100.
Закодируем слово ПЕЧЕНЬЕ в двоичном коде: 01 00 11 00 10 100 00(2). Переведем это число в восьмеричную систему счисления любым известным нам способом, получим 23120(8).
Якщо на другий поверх 9,то на перший поверх 9:2:4,5.тепер щоб дізнатись скільки на 7 поверх треба 4,5*7=31,5.
Var a: array[1..6] of integer;
i, k, d, v, n: integer;
begin
for i:=1 to 6 do
begin
write('Введите элемент массива под номером ', i, ' = ');
readln(a[i]);
end;
k:=0;
d:=0;
v:=0;
n:=6;
for i:=1 to n do
if a[i]=0 then
k:=k+1
else
if a[i]>0 then
d:=d+1
else
if a[i]<0 then
v:=v+1;
writeln('Количество нулевых = ', k);
writeln('Количество положительных = ', d);
writeln('Количество отрицательных = ', v);
end.
