<span>Все буквы различны, каждая вынуждена встречаться только 1 раз, поэтому количество слов будет равняться количеству перестановок P =7 (при условии, что на "ы" тоже слова могут начинаться) = 7*6*...*1 = 5040</span>
1)
Program n1;
var n,sum,i: integer;
begin
readln(n);
sum:=0;
for i:=2 to n do if i mod 2=0 then sum:=sum+i;
write(sum);
end.
2)
Program n2;
var i,sum: integer;
begin
sum:=0;
for i:=10 to 99 do sum:=sum+i;
write(sum);
end.
//////////////////////////////////////////
Для 16 (2^4)
640*480*4=1228800 бит=153600 байт
512*1024=524288 байт
524288 /153600=3
Для 256 (2^8)
640*480*8=2457600 бит=307200 байт
512*1024=524288 байт
524288 /307200=1
67125/2=33562 - ост 1
33562/2=16781 - ост 0
16781/2=8390 - ост 1
...
1/2=0 ост 1
Запишем остатки в обратном порядке: 10000011000110101
67125 (10)=10000011000110101 (2)
Теперь переведем из 2 в 8
10000011000110101 (2), разбиваем числа по 3 начиная с конца:
010 000 011 000 110 101 , переведем каждое из них в 8
2 0 3 0 6 5
10000011000110101 (2) = 203065 (8)
Теперь переведем из 2 16
10000011000110101 (2), разбиваем числа по 4 начиная с конца:
0001 0000 0110 0011 0101 , переведем каждое из них в 16
1 0 6 3 5
10000011000110101 (2) = 10635 (16)
Ответ: 10000011000110101 (2); 203065 (8); 10635 (16);
PS: Разбитие на 3 и на 4 объясняется тем, что 1 число восьмеричное пишется в двоичной системе из 3 знаков, а 16 из 4.