Tin học Tính tổng các số của dãy A

Bùi Việt Hưng

Học sinh mới
Thành viên
3 Tháng sáu 2018
7
4
6
23
Phú Thọ
thpt Xuân Áng
  • Like
Reactions: Đình Hải

Tạ Đặng Vĩnh Phúc

Cựu Trưởng nhóm Toán
Thành viên
10 Tháng mười một 2013
1,559
2,715
386
25
Cần Thơ
Đại học Cần Thơ
Đầu tiên bạn đọc vào mảng độ dài N, sau đó chỉ cần duyệt số 0 là ổn, với điều kiện dữ liệu đảm bảo tồn tại 2 số 0 thì:
var s,d, sum;
begin

for i := 1 to N do read (a);
s := 1;
while (s <= N) do begin
if a ==0 then break;
inc (s);
end;
inc (s);
while (s <= N) do begin
if (a == 0) then break;
sum = sum + a;
end;
write (sum);
end.
 
Top Bottom