uses crt;
var a:array[1..100]of integer;
n,i,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
if (a[i] mod 3=0) and (a[i] mod 4<>0) then t:=t+a[i];
writeln('Tong cac so chia het cho 3 nhung khong chia het cho 4 la: ',t);
readln;
end.
Viết chương trình nhập vào 1 dãy số nguyên gồm N phần tử(N<=100) và thực hiện: _Tính tổng các số âm trong dãy vừa nhập _Đếm số lượng các số chia hết cho 3 nhưng không phải là số chẵn trong dãy đó
Nhập 1 mảng A gồm N số nguyên (N nhập từ bàn phím và <=100) Tính tổng các phần tử chia hết cho 3 có mặt trong dãy
Viết công thức nhập vào dãy số N phân tử đếm các phân tử không chia hết cho 3.Tính tổng các phân tử chẵn không chia hết cho 4.Kết quả hiển thị ra màn hình
Viết CT nhập dãy số nguyên A gồm n phần tử (n<=100) . Tính và đưa ra màn hình tổng các số chia hết cho 3 và 5 trong dãy
Viết chương trình nhập 1 dãy số gồm N số nguyên N≤100 in dãy vừa nhập.Tính và đưa ra màn hình tổng các số chia hết cho 2 nhưng không chia hết cho 3 trong dãy trên.Ghi kết quả vừa tính được vào tệp Bài tập.Out
Giúp mình với ạ
Em hãy viết chương trình nhập vào dãy số nguyên không qua 200 phần tử tính và đưa lên màng hình tổng các phần tử chia hết cho 5
Cho mảng A gồm n phần tử là các số nguyên a, Nhập vào mảng A từ bàn phím b, tính tổng của các phần tử chẵn c, tính tổng của các phần tử lẻ d, đếm xem có bao nhiêu phần tử trong dãy chia hết cho 3
Viết chương trình nhập vào mảng A gồm N ( n<=100 )số nguyên. Thực hiện yêu cầu sau. ( 5 điểm ).
a.Tính trung bình cộng các phần tử chia hết cho 3 VÀ 5 trong mảng ( 2 điểm )
b. In ra các phần tử chia hết cho M trong mảng và tính tổng các phần tử chia hết cho M, với M được nhập từ bản phím ( 3 điểm )
Lưu ý: Chương trình chạy được, trình bày tốt về cản lề, xử lý yêu cầu bài toán và in kết quả đúng 1 điểm).
Nhập vào mảng A (\(n\le200\)) là số nguyên. Viết chương trình C++ tính tổng các phần tử có giá trị chẵn và đếm các phần tử chia hết cho 3
