期末考試-大漲巴股票

size 400 400forever{paper 60pen 90 10set B 75repeat A 0 1000{same? A B{line A 0 B 0line (A*5) 50 (A*5) (B*5)line (A*3) 0 (B*3) (A*3)line (A*4) 0 (B*3) (B*4)


}notsame? B A{line (A*3)10(A*3) (A*3)line (A*2) 20 (A*2) (A*2)line (A*4) 60 (B*4) (B*4)line (A*5) 30 (B*5) (A*5)line (A*6)400(A*6) (A*6)line (A*12) 50 (A*12) (A*12)line (A*8) 30 (B*7) (B*8)
}}}