NHẬP VÀO N SỐ NGUYÊN A1, A2,... AN, TÍNH TỔNG CÁC SỐ Ai >=5, XUẤT KẾT QUẢ.
Những câu hỏi liên quan
Viết chương trình nhập từ bàn phím số nguyên dương N,N <=100 và dãy A gồm N số nguyên A1,A2,...An. xuất ra màng hình tổng các số nguyên trong dãy A theo yêu cầu sau
1 : viết các thủ tục nhập / xuất mảng A
2 : Viết các hàm tính tổng các số nguyên tromg dãu A, tổng số chẵn, tổng số lẻ trong dãy A
Mình chỉ viết chương trình chính thôi, còn chương trình con bạn tự viết nhé
uses crt;
var a:array[1..100]of integer;
i,n,t,t1,t2:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
edn;
t:=0;
for i:=1 to n do
t:=t+a[i];
writeln(t);
readln;
end.
Đúng 0
Bình luận (0)
viết chương trình nhập từ bàn phím số nguyên dương n và dãy số nguyên a1 a2 đến an đưa dãy vừa nhập ra màn hình tính tổng các số chia hết cho 7 đưa kết quả ra màn hình
uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
for i:=1 to n do
write(a[i]:4);
writeln;
t:=0;
for i:=1 to n do
if a[i] mod 7=0 then t:=t+a[i];
writeln('Tong cac so chia het cho 7 la: ',t);
readln;
end.
Đúng 1
Bình luận (0)
Viết chương trình sử dụng lệnh lặp While…do để tính tổng các số lẻ có trong n số nguyên a1, a2, a3, …, an. Các số n và a1, a2, a3, …, an được nhập vào từ bàn phím.
Viết một chương trình nhập n nguyên dương và n số nguyên a1, a2,…,an. a/ Tính tổng các số chẵn của dãy (In kết quả trên một dòng) b/ In các số của dãy nằm ở vị trí chẵn (2,4, 6…) ra màn hình (trên 1 dòng ),
Viết chương trình tính tổng các số chẵn trong dãy số nguyên A1, A2, ..., An. Biết rằng n, A1, A2, ..., An là các số nguyên nhập từ bàn phím (n>0)?
Các bạn giúp mình nha ,mình cần gấp lắm
program Tinhtong;
uses crt;
var a:array[1..100] of integer;
sum,n:integer;
begin clrscr;
write('Nhap n = '); readln(n);
for i:=1 to n do
begin
write('a[',i,'] = '); readln(a[i]);
end;
sum:=0;
for i:=1 to n do
if (a[i] mod 2 = 0) then sum:=sum+a[i];
write('Tong cac so chan = ',sum);
readln;
end.
Đúng 2
Bình luận (1)
xây dựng bài toán cho các bài toán sau:
a)nhập vào số nguyên N và dãy các số a1,a2,...,an.hãy tính tổng các số dương có trong dãy
b)nhập vào số nguyên N và dãy các số a1,a2,...,an.hãy đếm các số dương có trong dãy
Cho dãy số nguyên a1,a2... an(ai<109,0<n=<50). Nhập và xuất dãy số.
1. Nhập số nguyên dương N , dãy số A1 , A2 .... , An ;2. Tổng -- 0 ; i -- 13. Nếu iN thì đưa ra tổng rồi kết thúc 4. Tổng--Tổng +Ai ; i-- i + 15. Quay lại B3Thuật toán sau dùng để giải quyết bài toán nào :A. Tính tổng các số chẵn của dãyB. Tính tổng các số dương trong dãy C. Tính tổng dãy sốD. Tính tổng các số lẻ trong dãy
Đọc tiếp
1. Nhập số nguyên dương N , dãy số A1 , A2 .... , An ;
2. Tổng <-- 0 ; i <-- 1
3. Nếu i>N thì đưa ra tổng rồi kết thúc
4. Tổng<--Tổng +Ai ; i<-- i + 1
5. Quay lại B3
Thuật toán sau dùng để giải quyết bài toán nào :
A. Tính tổng các số chẵn của dãy
B. Tính tổng các số dương trong dãy
C. Tính tổng dãy số
D. Tính tổng các số lẻ trong dãy
: Viết chương trình nhập vào một dãy số A gồm N số nguyên a1, a2,…,an (n300, |ai| 40000).a. Tính tổng dãy số A.b. Tính tổng các số chia hết cho 3 có trong dãy số trên.c. Đếm số lượng số chẵn, lẻ có trong dãy số trên.f. tìm phần tử lớn nhất, nhỏ nhất của dãy số.g. Tính tổng bình phương các số âm có trong dãy số trên.
Đọc tiếp
: Viết chương trình nhập vào một dãy số A gồm N số nguyên a1, a2,…,an (n<=300, |ai| <= 40000).
a. Tính tổng dãy số A.
b. Tính tổng các số chia hết cho 3 có trong dãy số trên.
c. Đếm số lượng số chẵn, lẻ có trong dãy số trên.
f. tìm phần tử lớn nhất, nhỏ nhất của dãy số.
g. Tính tổng bình phương các số âm có trong dãy số trên.