Ну переводишь всё в 10-ю (сумма произведений разрядов на с.с. в степени позиции разряда):
(3 * x^0) + (3 * x^1 + 1 * x^0) = (1 * x^2 + 1 * x^1) <=>
3 + 3x + 1 = x^2 + x <=>
x^2 - 2x - 4 = 0
D = 4 - 4 * 1 * (-4) = 20
=> x - не целый => решения нет
Ответ:
var i: integer;
begin
for i:=10 to 99 do
if (i mod 7 = 0) and (616 mod i = 0) then writeln (i)
end.
Построим дерево, опираясь на данные кодов A, B, C, D, E, F. Слева единицы, справа нули.
Решение смотри во вложении.
For i = 1 To 9
For j = 1 To 9
s$=String(i*j)
if length(s$)=1 then s$=" "+s$ else if length(s$)=2 then s$=" "+s$
Print s$;
Next j
Print
Next i
End
Результат работы программы:
1 2 3 4 5 6 7 8 9
2 4 6 8 10 12 14 16 18
3 6 9 12 15 18 21 24 27
4 8 12 16 20 24 28 32 36
5 10 15 20 25 30 35 40 45
6 12 18 24 30 36 42 48 54
7 14 21 28 35 42 49 56 63
8 16 24 32 40 48 56 64 72
9 18 27 36 45 54 63 72 81
Замечание: таблица на самом деле ровная, это тут ширина пробела и ширина цифры различна, поэтому сдвиг.