Все четырёхбуквенные слова, составленные из букв В, И, Н, О, Г, Р, А, Д записаны в алфавитном порядке и пронумерованы, начиная с 1. Начало списка выглядит так: 1.
2. АААВ
3. АААГ
4. АААД
5. АААИ
6. АААН
7. АААО
8. АААР
9. ААВА
...
Под каким номером в списке идёт первое слово, которое начинается с ГО?

р в квадрате так

100010,011101=42,35   (вос. сис.)

10010,011101=22,1d   (шест. с.)

  111 111 111 000 001=77701(в.с)

  0111 1111 1100 0001(добавляем 0)=7fc1 (ш.с.)

0,000110101=0,065(в.с) (доб. 00)

0,0110101=0,35(ш.с.) 

0,11 100 110 101=0,3465(в.с.)

0,111 0011 0101=0,735(ш.с.) 

разбиваем числа на триады (группы по 3 числа в каждой), и смотрим значение по таблице, получается:

1) 6224

2) 64472

var a,b,s: integer; begin readln(a); while a> =10 do begin b: =a mod 10; s: =s+sqr(b); a: =a div 10; end; a: =a*a; s: =s+a; writeln(s); readln; end.в s накапливаем сумму квадратов, b это остатки от деления на десять, после цикла прибавляем последнюю цифру,которая меньше десяти, предворительно возведя её в квадрат!