... 0) then d:=d+1; writeln('so phan tu cua mang chia het cho la: ',d); readln end Câu 3: (Đề thức THPT) Thi t lập chế độ đồ hoạ mô bóng tròn màu đỏ chuyển động đập vào cạnh hình dới góc 450 ? Program ... a:=320; b:=240; dx:=2; dy:=2; Repeat Setcolor(red); {Thiet lap ve hinh tron rong voi mau vien mau do} Circle(a,b,r); Delay(100); Setcolor(black); {Thiet lap ve hinh tron rong voi mau vien mau den ... - r) then dy:=-2; If (a < r) then dx:=2; Until keypressed; closegraph; readln end Câu 2: ( (Đề dự bị THPT) ) Viết chơng trình tính giá trị tổng X(N) = + 33 + 53 + + (2N + 3, với N lần lợt 0, 1,...