Ngày tải lên :
25/07/2013, 21:19
... Chu_Bong(c1+50,h1,8,0,5,Lightred,cyan,5,'TRUONG DHBK HA NOI'); Chu_Bong(C1+190,h1+50,8,0,4,Lightred,cyan,4,'KHOA CNTT');} Chu_Bong(C1+90,h1+30,7,0,4,14,cyan,3,'BAI TAP LON MON'); Chu_Bong(C1+260,h1+80,7,0,4,14,cyan,3,'KY ... phần trên); So Là mã trả chuỗi St ta thực việc đổi chuỗi sang số, số sau đổi lưu vào biến Mau ( Biến toàn cục ) Khi thủ tục gọi thông báo cho phép nhập màu cần vẽ qua thủ tục gọi UnitDt2 gồm: ... {Tinh toa dộ man hinh diem xuat phat} c:=c0+round(x*k);h:=h0-round(y*k); moveto(c,h); SetColor(Mau); while Af < 2*pi begin Af:=Af+0.01; ham:=r(Af);x:=ham*cos(Af);y:=ham*sin(Af); {Tinh toa man...