, . , , CFPascal. . , , : , 12, XII . . , , , . , , , , , ..
, , XIX XX .
() , ( 0 1). , .
1) 0 ;
2) ;
3) 0 ;
4) b , b ;
5) - 0 , n, , , .
- - .
, . n s(n). :
1 s(0)
2 s(1) = s(s(0))
10 s(9) = s(s(8)) =
100 s(99) = s(s(98)) =
0, 1, 2, , 10, , 100, 0 s, . , 10 > 8,
10 = s(s(8)), 5 = 3 + 2, 5 = s(s(3)) (s ). , , 0, .
, , .. , , , , . , , , . , 100 10, , , , , .
|
|
, , , , . , , , , .
[ , , IFSort3 ]
, , . , , , , , . CF Pascal, , 12 11+1, 10+2, 7+5 .. , BASIC . , . .
, .