Последовательность Фибоначчи. Следующий элемент: 34 + 55 = 89
Записываем все натуральные числа подряд и разбиваем их на цифры
о, д, т, ч, п, ш, с, в, д, д, ... Выписываем натуральные числа в ряд. Каждому натуральному числу сопоставляем первую букву его названия. 1 -> о (один) 2 -> д (два) ... 10 -> д (десять) 11 -> о (одиннадцать)
Первый элемент 1. Каждый следующий элемент образуется так: выделяем цифру, считаем, сколько раз она встречается подряд в этом числе, начиная с текущей позиции и приписываем в конец нового числа пару (сколько раз цифра встречается подряд, сама цифра) 1) 1 2) 1 встречается 1 раз. Значит, пишем 11 3) 1 встречается 2 раза. Значит, пишем 21 3) 2 встречается 1 раз. Значит, пишем 12. 1 встречается 1 раз. Значит, пишем 11. Получилось 1211 4) 1 встречается 1 раз. Значит, пишем 11. 2 встречается 1 раз. Значит, пишем 12. 1 встречается 2 раза. Значит, пишем 21. Получилось 111221. 5) аналогично 6) 3 встречается 1 раз. Значит, пишем 13. 1 встречается 1 раз. Значит, пишем 11. 2 встречается 2 раза. Значит, пишем 22. 1 встречается 2 раза. Значит, пишем 21. Получилось 13112221
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
var a:=MatrGen(n,n,(i,j)->j=n-1-i?n-i:0);
a.Println(2)
end.
Примеры
n= 7
0 0 0 0 0 0 7
0 0 0 0 0 6 0
0 0 0 0 5 0 0
0 0 0 4 0 0 0
0 0 3 0 0 0 0
0 2 0 0 0 0 0
1 0 0 0 0 0 0
n= 12
0 0 0 0 0 0 0 0 0 0 0 12
0 0 0 0 0 0 0 0 0 0 11 0
0 0 0 0 0 0 0 0 0 10 0 0
0 0 0 0 0 0 0 0 9 0 0 0
0 0 0 0 0 0 0 8 0 0 0 0
0 0 0 0 0 0 7 0 0 0 0 0
0 0 0 0 0 6 0 0 0 0 0 0
0 0 0 0 5 0 0 0 0 0 0 0
0 0 0 4 0 0 0 0 0 0 0 0
0 0 3 0 0 0 0 0 0 0 0 0
0 2 0 0 0 0 0 0 0 0 0 0
1 0 0 0 0 0 0 0 0 0 0 0