Página 198 - Apuntes de análisis de decisiones I
Versión de HTML Básico
(.):....l... ~
......
i-rL-......"
\." , . I_'"l AII(''' . ,,, . , " ... .. ,
•
",~ ,
... "
"o-
. ~
...
~,, "~
. , ,, _
. "
6.:)'il)
LOClilE:: '...·+ l, If:¡:.¡ü l... '
·' üi::SCUEI-J10 " :LúC,...
¡1::.
\,1 '?' l~ H+J.v ; h;l l'" · ~e:"IIt::.
,..
t:._
u
úo!:.oÚ;J
LOLiil E '; ' ''':' ,i-¡:l" i,lr'''l " foIL
· :LUl..HII::. " ...
.t ,H-t-lo:PR1NI
" 10 AL "
u¿,l V
COLaR
1 ,
¡j:
I<El
Uf,l'"
¿'6~(J
LUCr-tl"t: V-t ':'¿ ,1"'6: CDLLII.
v ' ¡ 't"-r<l¡'¡¡
USING "#W. " ;lN1E*l ÜU; : PRIN I
"X " ;
66;';0
LGCHT~
v-t-'z ,II+ ¡6d- i<ll-n USlI..jG
"**"J
1NfE. .. l0V J : PRINf
" x,";
b~"
(; .
COLOR ,- ,
v;
¡,El
üR¡~
u,,.)Ju
NLE ::.:Ij'JSUi.I-1:H=-4
i; ,;.,¿'..)
GOot;[.
~7':'V
66 :0 GG:::'UO :''/00
b¿.üO ... f ·,' $""CH¡''''
Ui
¡
'rHE¡", Ó6!:)Ü
66O:¡v
lF
VAL(',$)"-'(I 'IHEIoI
,· .~ "O"
6;-00
I ~Lj
o .;: ) ....
,,·,::.L
(I·f.)
wi'1 0 GOSUB
~l}60
6 720
l'IEL~T r1::L·
.. H:::L1 (/ ... )
67 :':'0 H"-' 14
~ i
,10 G05UB ::;9:'..
1
ú .,-::;,:¡
GOSUB
~i0
....
¿~'u0
lF
Y$.:::.CH""'\ 4,J
,deN
,1I:.L""1 1 EL - lt:::LI\t:": ):ljll IÜ
b65()
6 , ;''':; :'F
VAL( Y ';;} ~ú T HE¡~
i.""," v "
6,i;..iCo (,¡. 'OIi (r.;, ):rv,.IL\ ,. J
6 /'10
ü¡JSUD 5960
¿L:v':;
i+=24
6i31
o
GGSUB ' 3930
ú320 GOSUB
~
i
0(,
b830 1;" 'i_""GHr;*
\.i:./)
','HE:H 0 ;30
6"!j.v I F VAL';
;$ j..:.(;
-¡dd~
·I'·. ..... ·'V"
bB:iO Ci)FR<i(¡=.V,.,L': ,-,)
t<66u
G03Ua
!J';(:o..J
o;.¡~¡':'¡
(;H':bil...
j ...
:..i:.Ll \ ;... }
,-c.;püH
, i ...
i ·j·Lut·"
Ü;,,)
b8ó0
LO~ATE
v , :";.Q:n': IUi u::;¡t ...G
': n.UUHU.......
lf'· JL.;fl:.b(k.J
6G';O H
u
44
ó l'j
00
GOSLla
:.;t/::;.v
, ../i' .l (;
GCJúUD
~;
Oú
ú"¡~.)
IF ,·$:.C!If""
eLi' ,
¡
H¿i,. 00(}0
u·:':".J
1¡: '...'Ai.....\,·:•..} - .....
itié..i ~
',,,,- ' v "
6 9 40 an;lD
W.J _..
,,0'-1;... ..
, .¡
¿:, $O
6 ';'':''':'
w';;- ;';
u , ......
GOSt...;¡;
~ ,
ov
d . :......
~
I'¡Li:.-':;
';G,;;;';ü
!:o ,:.... .....
~~GüU
.:.;,(,(,
.... ,v
ir:
,~ -C":R"\'i:;) Ijll:.i ~
hLr:. ·- ;':büflJ
613:;",
7 0 00 IF
VAL ( . $j.:....v
¡HEI" ', . ...
· v '·
'l ú l O
FVD~
o ... ) ":";·""IL '
I··i.)
7020 GOouB :.;<,60
iv':"ú
'vrcl~'
..
~ J ""'CjL&(r..:} *¡..;j)lJE\;....i
7':: 4-0 TVf."C ""TV¡':C
.·VPCN O<i
;' (..~o
LOC..:.lt;: V,00:;:ñ1l·.jj
U!:)li~b
'· .a'iftUttr,t"" ,, ;
Vf-'l:N (K)
7 VOO '"PON 0< ) .....
i::H
üa o...: ;
';'F úOE
(;..: ¡
;0tO
1'",,'¡:· [);... , VrBi··;i~ Bj'.\ ;";- )
7080 LCJCi-tTE V,
Iv :F¡.'U¡~r
USING " ...
4I-h........
# ...
# " J
Vf"i:c'I·.j
(K)
l(l9v GUSLl[-. u2:;O
, · ... 0 0
J./:
R!io ....
" ¡-.¡ "
l HEi..
¡
j~i..... -.
I
li:.L- Jf:.Ll ( K):
¡
VPC:c
i
v PC-vPCN (K I : GOTO 6960
'11l !)
m:: 1 UI\I~
7 1
~o H,¡::.j~
no
-~ B,
BB
H~ )
- l,;}
eb
H.
i
} 13ü
',r
EI"'~'íf
EN ,·FIJEN <lO
; 1 ..
(¡
LüCtdt::
V,6\.¡.rR 1f.~f
USiNG
·' ~H'*~tHHf"'ff " ;HH:::. "'( k) ;
7 1 ~ ,)
....
'f'N2 (Kl =+úEH 0 0 *r-.:iüE
o..: )
j'
j
¿'O T....PNo:c
J
vI'
iH"'-¡:
I ~E
\ td
'; ' ':' ¡'ó
LOL;/¡JE V,
i v : i
.'ll ... .
JSIIib .
~HU"HHlti1" " ;
...+ NI:::. (t..:) ;
7 1Gv fi.E'r
U¡-~I'"
; ' 1
IV
f 'ü(,
r;r- l1
IU
;' -I : ki::. ,
¡ L ¡
tJh' :'~e .>. 1
7'::':';'0 LUGATC: 6r-H', ..:.;: Fti i¡"¡¡ 11i:.I"¡U:io(j·I( J I
;' , 1 0
CULLJH
Ct ,
¡ .
i2~U
jF
I~ ,"'lo i"t:. I~
lu ·· l
t::Lbi:.
fH .:.:lüi·l
'; ,,:;.:.. LüCitrt:.
él
;'¡~ ¡, ':' : r t; li~
I HEfW$ OH),
:.' J......
f: '• .
·J ~H.' - I'I .'
198
