1/ Đoạn chương trinh sau thực hiện i:1; S:0; While (i N) Do begin S:S+i; i: i+2; end; Write(S ,S); a.Tinh tổng các số lẽ từ 1 đến N-1 b.Tính tổng các số từ 1 đến N c.Tính tổng các số chân từ 1 đến N d.Tính tổng các số lẽ từ 1 đến N2/Var A: array[0..4] of byte; T: 0; For i:0 to 4 do if a[i] div 30 then T:-T+ a[i]; Khi cho giá trị các phần của mảng lần lượt như sau: (9,2,12,1,6). Kết quả T? a.3 b.27 c.2 d.38
Đọc tiếp
1/ Đoạn chương trinh sau thực hiện i:=1; S:=0; While (i < N) Do begin S:=S+i; i:= i+2; end; Write('S = ',S);
a.Tinh tổng các số lẽ từ 1 đến N-1
b.Tính tổng các số từ 1 đến N
c.Tính tổng các số chân từ 1 đến N
d.Tính tổng các số lẽ từ 1 đến N
2/Var A: array[0..4] of byte; T: 0; For i:=0 to 4 do if a[i] div 3=0 then T:-T+ a[i]; Khi cho giá trị các phần của mảng lần lượt như sau: (9,2,12,1,6). Kết quả T?
a.3
b.27
c.2
d.38
