Câu 1 :
- for i := 1 to 5 do readln(a[i]);
+ i = 1 ⇒ readln(a[1]) ⇒ nhập giá trị phần tử a[1]
+ i = 2 ⇒ readln(a[2]) ⇒ nhập giá trị phần tử a[2]
+ i = 3 ⇒ readln(a[3]) ⇒ nhập giá trị phần tử a[3]
+ i = 4 ⇒ readln(a[4]) ⇒ nhập giá trị phần tử a[4]
+ i = 5 ⇒ readln(a[5]) ⇒ nhập giá trị phần tử a[5]
=> Nhập được 5 giá trị
Câu 2 :
- Giá trị tb = 1
- a[1] = 1, a[2] = 4, a[3] = 7, a[4] = 2, a[5] = 6
+ i = 1 ⇒ tb = tb + a[1] = 1 + 1 = 2
+ i = 2 ⇒ tb = tb + a[2] = 2 + 4 = 6
+ i = 3 ⇒ tb = tb + a[2] = 6 + 7 = 13
+ i = 4 ⇒ tb = tb + a[2] = 13 + 2 = 15
+ i = 5 ⇒ tb = tb + a[2] = 15 + 6 = 21
=> Giá trị tb = 21