=================== b-t-f1 ============================ $$b //ƒrƒWƒlƒXā–ąƒZƒNƒVƒ‡ƒ“ $r //ŠúŠÔŒĀ’čƒRƒ}ƒ“ƒh 6510,0103 //š1965”N10ŒŽ‚Đ‚į2001”N‚RŒŽ $f //ƒtƒ‰ƒOėŽƒRƒ}ƒ“ƒh ==..(7103)41401 //š‘åŽčŒšÝ‚Ƀtƒ‰ƒO‚‡ $n //Šé‹Æ–žƒRƒ}ƒ“ƒh lst, //Šé‹Æ–žƒpƒ‰ƒ[ƒ^iƒŠƒXƒgo—́j $t //ŽžŒn—ņėŽƒRƒ}ƒ“ƒh &fl,3001,,sales //”„ã‚ &fl,3002,,cost of goods sold //”„ãŒī‰ŋ &st,2144,,total liability & net worth //‘Ž‘–{ $l //“ü—Í•Ï—Ę–žƒŠƒXƒgƒRƒ}ƒ“ƒh =============== $$v //•Ï—Ę•ŠÍƒZƒNƒVƒ‡ƒ“ $a //•Ï—Ę‹L†Š„“–ƒRƒ}ƒ“ƒh x,sales y,cost of goods sold z,total liability & net worth $t //•Ï”•ÏŠ·ƒRƒ}ƒ“ƒh x=&.a(x)1,4 //ŒŽŽŸ‚ð”N“xi‚SŒŽ`—‚”N‚RŒŽj‚É•ŌW y=&.a(y)1,4 // 2ŒŽŠúŒˆŽZ‚Ė‘―‚Ē‹ÆŽí‚ł́u1,4v‚ðu1,3v‚ɕύX y=&.a(y)1,4 z=&.a(z)1,4 r=(y/x*100) //”„ã‚Œī‰ŋ—Ķ u=(x/z) //‘Ž‘–{‰ņ“]—Ķ =pr*(x,y,z,r,u) //”’lƒvƒŠƒ“ƒg P=:ci(x) //ŒÂ‘Ėi”N“xjŽŊ•Ę•ķŽšŒn—ņ =========== $$g //ƒOƒ‰ƒtƒZƒNƒVƒ‡ƒ“ $d //•\ŽĶ”͈̓Rƒ}ƒ“ƒh all //‘SŠúŠÔ $p //ƒvƒƒbƒgƒRƒ}ƒ“ƒh r //”„ã‚Œī‰ŋ—Ķ‚’ r,xy //”„ã‚Œī‰ŋ—Ķ‚’C•ĘƒXƒP[ƒ‹‚Å”„ã‚‚˜‚Æ”„ãŒī‰ŋ‚™ u //‘Ž‘–{‰ņ“]—Ķu u,xz //‘Ž‘–{‰ņ“]—ĶuC•ĘƒXƒP[ƒ‹‚Å”„ã‚‚˜‚Æ‘Ž‘–{z r,u //”„ã‚Œī‰ŋ—Ķ‚’C•ĘƒXƒP[ƒ‹‚Å‘Ž‘–{‰ņ“]—Ķu $c //ŽU•z}ƒRƒ}ƒ“ƒh y,x,*,P //cŽē‚™•Ï—ʁC‰ĄŽē‚˜•Ï—ʁC‰ņ‹Aü•\ŽĶ–CŒÂ‘ĖŽŊ•ĘP x,z,*,P //cŽē‚˜•Ï—ʁC‰ĄŽē‚š•Ï—ʁC‰ņ‹Aü•\ŽĶ–CŒÂ‘ĖŽŊ•ĘP r,u,*,P //cŽē‚’•Ï—ʁC‰ĄŽēu•Ï—ʁC‰ņ‹Aü•\ŽĶ–CŒÂ‘ĖŽŊ•ĘP ==================== $$ //I—đƒZƒNƒVƒ‡ƒ“