Спо ! )) снежная королева задала каю новое . он должен каждый день выкладывать перед входом в замок прямую дорожку из белых и голубых льдинок. дорожка всегда должна иметь одну и ту же длину 11, и рисунок в каждый следующий день должен отличаться от рисунков в предыдущие дни. кроме того, королеве не нравится, когда подряд идут две белые льдинки. в тот день, когда кай не сможет больше выложить ни одной новой дорожки, он будет свободен и сможет отправиться домой. сколько дней ему предстоит трудиться?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=new integer[4,4] ((1,15,14,4),(12,6,7,9),(8,10,11,5),(13,3,2,16));
a.Println(3);
var b:=new integer[6,6] ((6,32,3,34,35,1),(7,11,27,28,8,30),
(19,14,16,15,23,24),(18,20,22,21,17,13),(25,29,10,9,26,12),
(36,5,33,4,2,31));
Writeln;
b.Println(3);
end.
Результат:
1 15 14 4
12 6 7 9
8 10 11 5
13 3 2 16
6 32 3 34 35 1
7 11 27 28 8 30
19 14 16 15 23 24
18 20 22 21 17 13
25 29 10 9 26 12
36 5 33 4 2 31