, . 1- , 2- - .. . 0- ( ) .
, 20134 :
a[1] | a[2] | a[3] | a[4] | a[5] | a[6] | a[7] | a[8] | |
. -, : , , , -, ( ), .
: , , , ( ). !
ü , ;
ü ;
ü ();
ü ( 1- - , 2- - ..).
() , , .
, , . , , . , , . (. . , ), . , .
:
1 - , .
a[1] | a[2] | a[3] | a[4] | a[5] | |||||
+ | |||||||||
b[1] | b[2] | b[3] | b[4] | b[5] | |||||
[1] | [2] | [3] | [4] | [5] | c[6] |
B, 1-. , 1- : , , .
|
|
2 ( ).
, , B. . .
Var
i, r: integer;
{r - " "}
Begin
if a[0] < b[0] then a[0]:= b[0];
{ }
r:= 0;
{ 0}
for i:= 1 to a[0] do
Begin
a[i]:= a[i] + b[i] + r;
{ }
if a[i] >= 10
then { , }
Begin
r:= 1;
dec(a[i], 10);
End
else r:= 0; {, }
end;
{ , }
if r > 0
Then
Begin
inc(a[0]);
a[a[0]]:= r;
end;
. , . , .
, : (. . , ) .
. , , .
, . i- i 1.
, . b. , b. , . , b. , , . .
4531 | 7
42 ------
---- | 647
----
---
, , .