R(0) = 0
R(1) = 0
R(2) = 1
R(3) = R(2) + R(0) + R(2) = 1 + 0 + 1 = 2
R(4) = R(3) + R(1) = 2 + 0 = 2
R(5) = R(4) + R(2) + R(3) = 2 + 1 + 2 = 5
R(6) = R(5) + R(3) = 5 + 2 = 7
R(7) = R(6) + R(4) + R(4) = 7 + 2 + 2 = 11
R(8) = R(7) + R(5) = 11 + 5 = 16
R(9) = R(8) + R(6) + R(5) = 16 + 7 + 5 = 28
<span>R(10) = R(9) + R(7) = 28 + 11 = 39</span>
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrInteger('Введите массив', 10);
a.Where(t -> (abs(t) > 9) and (abs(t) < 100)).Println();
end.
5 единиц
Пишешь в ответе так: 11111
#include <iostream>
<span>using namespace std;
</span>void mxd(int n) {
<span> int k,mx=0;
</span><span> do {
</span><span> k=n%10; n/=10;
</span><span> if (k>mx) mx=k;
</span><span> }
</span><span> while (n>0);
</span><span> cout<<mx<<endl;
</span><span>}
</span><span>int main() {
</span><span> int n;
</span><span> cout<<"number: "; cin>>n;
</span><span> mxd(n);
</span><span> </span><span /><span>system("pause");
</span><span> return 0;
</span><span>}
</span><span>
</span>