Pascal 11 giúp với

[Arsenal_Huy]

Giúp mình viết 1 thuật toán tính tổng số lẽ trong dãy số vừa nhập với. Cảm ơn nhiều.

[tinhquai]

Anh cứ tạm xem như em đang nói dãy vừa nhập vào là mảng một chiều vậy nhé. Thuật toán để tính tổng các số lẻ trong dãy số vừa nhập vào, thực tế, rất đơn giản. Trước tiên, em cần kiểm tra xem các số trong dãy, số nào là số lẻ, sau đó tính tổng các số này. Thật đơn giản, đó cũng chính là ý tưởng của thuật toán, một điều đơn giản mà ai khi đọc đề cũng có thể nhận ra. Từ ý tưởng này, ta đưa ra thuật toán cho bài toán trên.

Thuật toán tính tổng các số lẻ trong một dãy cho trước

Input: spt: số phần tử của dãy đã cho; array[spt]: dãy đã cho, chiều dài chính là spt.
Output: tong: tổng các số lẻ.
Giải thuật:



tong := 0; // khởi gán tổng bằng 0 - chưa tìm thấy số lẻ nào
for i = 1 to spt do

/* kiểm tra xem phần tử array[i] có phải là số lẻ hay không? */
if (array[i] mod 2 == 1) thentong := tong + array[i];
3. writeln(tong);
Anh thường thấy yêu cầu giúp bài tập pascal hoặc một môn học cấp III thường nằm trong mục Kiến thức > Các môn học phổ thông khác. Do đó, anh nghĩ em nên đưa bài vào post ở topic ấy thì hay hơn chăng?!