Cho N và dãy số a1,a2,...,an.Hãy cho biết co bao nhiêu số hạng trong dãy là số lẻ (số chẵn?Tính tổng của dãy số)
a,Xác định bài toán
b,Biểu diễn thuật toán bằng liệt kê hoặc sơ đồ khối
Xây dựng các bước mô phỏng cho trường hợp cụ thể của các thuật toán đã học
Quảng cáo
4 câu trả lời 2278
Input: N và dãy a1, a2,...an
Output: Số giá trị là số lẻ
*Thuật toán:
B1: Nhập n và dãy a1, a2,...an
B2: Cho i chạy từ 1 đến n nếu a[i] mod 2 = 1 thì đó là số lẻ
B3: In kết quả và kết thúc thuật toán
*Chương trình:
Program qtruong;
Uses crt;
Var n, i, dl: integer;
a:array[1..1000000] of longint;
Begin
Clrscr;
Write('Nhap so lg ptu, n = '); readln(n);
For i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
dl:=0;
For i:=1 to n do if a[i] mod 2 = 1 then inc(dl);
Writeln('Co ',dl,' so hang trong day co gia tri la so le');
readln
end.
Ok anh nhé!
Xác định bài toán
- Input: Qãy A gồm N số nguyên a1, a2..., aN ;
- Output: Số số hạng trong dãy A có giá trị bằng 0.
Ý tưởng: Tìm kiếm tuần tự được thực hiện một cách tự nhiên. Ta dùng biến đếm k để đếm số số hạng trong dãy A có giá trị bằng 0. Bắt đầu từ i = 7 và mỗi lần tăng i lên 1, ta lần lượt so sánh ai = 0?, nếu ai = 0 thì tăng k lên 1, tiếp tục quá trình cho đến khi i > N thì đưa ra kết quả k và kết thúc.
- Thuật toán
Cách liệt kê
Bước 1. Nhập N, các số hạng a1, a2..., aN
Bước 2. i<- k, k<- 0,
Bước 3. Nếu ai= 0 thì k <- k+1;
Bước 4. i <- i+1
Bước 5: Nếu i > N thì đưa ra giá trị k, rồi kết thúc;
Bước 6. Quay lại bước 3.
Quảng cáo
Bạn muốn hỏi bài tập?
Câu hỏi hot cùng chủ đề
-
55309
-
31164
-
29752

