2026-02-08 15:26:46 +00:00
|
|
|
|
pac <20> <00>S<><03> S <00>i=1 <00>9 :<3A><>i,0 ;" ..............":<3A>i:<3A>p=22562 "X :<3A>z=4
s <00>a:<3A>b:<3A>b( )=<3D>a(g,(g-p<0 ))+<2B>a(g,-(g-p>0 )):<3A>1 ,8 ,2 ,3 ,2 ,4 ,2
U <00>a<EFBFBD><61><EFBFBD>a,b;" ";<3B>a,17 -b;" ";<3B>10
|
2026-02-07 22:01:44 +00:00
|
|
|
|
-a,b;" ";<3B>10
|
2026-02-08 15:26:46 +00:00
|
|
|
|
-a,17 -b;" ":<3A>2
_ <00>g=22831 /Y :<3A>22689 <00>X ,129 <00> :<3A>22704 <00>X ,129 <00> :<3A>s=1 <00>85 U <00>0 :<3A>k$=<3D>
Y <00>.002xn<>,s/3 :<3A>n=<3D>a(p,(32 *(k$="d"))-(32 *(k$="e"))-(k$="o")+(k$="p"))
^ <00>a=(a*<2A>n)+n:<3A>p,0 :<3A>q=<3D>(p+a):<3A>p=p+a*(q<>56 8 ):<3A>6 ,3 ,8 ,4 ,2
W <00>p=p+(-14 *a*(q>99 c )):<3A>q=<3D>p:<3A>p,54 6 :<3A>g,z:<3A>j=g-p:<3A>4 ,4 ,4
a <00>j=<3D>a(g,32 *(j<-18 ))+<2B>a(g,-32 *(j>18 )):<3A>j=0 <00><>j=<3D>b():<3A>5 ,4
> <00>b=j-(b*<2A>j):<3A>g=g+b:<3A>z=<3D>g:<3A>g,40 ( :<3A>z=54 6 <00>q=40 ( <00><>
|
|
|
|
|
|
o <00>s=s+1 *(q=4 ):<3A>s:<3A>:<3A>a(l ,n )=n*(<28>(l+n)<29>56 8 ):<3A>6 ,4 ,8 ,0 ,1
|
