Дана последовательность чисел 0, 0, 1, 1, 2, 4, 7, 3, 4, 4 … , каждый элемент этой последовательности, начиная с четвёртого раве
NoriGloria [245]
Ответ будет 7.
Если интересно то вот код программы с помощью которого можно найти значение для любого элемента последовательности.
Вместо 1400 вводишь номер элемента
int a = 0, b = 0, c = 1, d = 1;
for (double i = 1; i <= 1400-3; i++ ) {
d = (c + b + a)%10;
a = b;
b = c;
c = d;<span>
Console.WriteLine(d);
}</span>
Числа в десятичной системе?
я могу только делением вам написать,т.к 2-го способа не знаю.
54=110110
117=1110101
259=100000011
мы просто делим число на 2 и пишем его с конца.
<em>// PascalABC.NET 3.2, сборка 1383 от 09.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadInteger('Количество строк в массиве:');
var m:=ReadInteger('Количество столбцов в массиве:');
Writeln('*** Исходный массив [',n,',',m,'] ***');
var a:=MatrRandom(n,m,0,1);
a.Println(4); Writeln(4*a.ColCount*'-');
Writeln(a.Rows.Any(x->x.All(x->x=0))?'Да':'Нет')
end.
<u>Примеры</u>
Количество строк в массиве: 10
Количество столбцов в массиве: 4
*** Исходный массив [10,4] ***
0 1 1 1
1 0 0 1
1 0 0 1
1 0 1 1
1 1 0 1
1 0 1 1
1 0 1 0
0 0 0 0
1 1 1 1
1 0 0 1
----------------
Да
Количество строк в массиве: 8
Количество столбцов в массиве: 5
*** Исходный массив [8,5] ***
1 1 0 0 1
1 1 0 1 0
1 0 0 0 0
0 0 0 1 1
1 0 1 1 1
1 0 0 1 1
1 1 0 1 1
0 1 1 1 0
--------------------
Нет
В цикле прибавит 7 к самой себе 9 раз, т.е 7*9=63
Ответ: 63