Cho chương trình sau: var ds:array[1. . 20] of byte; a,b,c,i:byte; begin for i:=1 to 10 do ds[i]:=i; a:=ds[10]; b:=ds[9]; i:=1; while i<=10 do begin a:=ds[i+1]; b:=ds[i+2]; i:=i+3; end; readln End. Chương trình trên có bao nhiêu bộ số lập thành tam giác

img1

img2

img3

img4

img5

img6

img7

img8

img9

img10

img11

img12