Mọi người giúp mình giải bài này đi. Cho dãy số nguyên gồm a1,a2,a3.....an .hãy đếm số lượng giá trị trong dãy số a) xác định bài toán b) mô tả thuật toán, cách liệt kê để giải bài toán
2 câu trả lời
var n,s,i:longint;
a: array [1..1000] of longint;
begin
write('Nhap n: '); readln (n);
for i:=1 to n do
begin
write('A[',i,'] = '); read(a[i]);
s:=s+a[i];
end;
writeln;
write('Tong la: ',s);
readln;
end.
Xác định bài toán :
Input : số n và dãy a1, a2, … , an
Output : số lượng số hạng có giá trị bằng k
Mô tả thuật toán :
Bước 1 : nhập số n và dãy a1, a2, .. , an và số nguyên k
Bước 2 : i ← 1, dem ← 0
Bước 3 : nếu i > n thì đưa ra giá trị dem rồi kết thúc
Bước 4 :
Bước 4.1 : nếu a[i] = k thì dem ← dem + 1
Bước 4.2 : i ← i + 1 quay lại bước 3
Câu hỏi trong lớp
Xem thêm
