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;
t:=0;
for i:=1 to n do
t:=t+a[i];
writeln('Tong cua mang la: ',t);
readln;
end.
Viết CT khai báo mảng A có n phần tử. Nhập giá trị cho các phần tử trong mảng. Tính tổng các phần tử của mảng
viết chương trình nhập vào mảng a có n phần tử là các số nguyên dương.Tìm các số xuất hiện trong mảng a và số có số lần xuất hiện nhiều nhất
Viết chương trình nhập vào số nguyên n (n<103) và dãy n số nguyên {a1, a2, ..., a3}
Yêu cầu:
- In lên mảng vừa nhập lên màn hình trên cùng 1 hàng
- In lên màn hình các phần tử có giá trị chẵn
VD: n=5 {3; 5; 8; 1; 60}
Kết quả:
3 5 8 1 60
C++ nhé, giúp e với ạ;-;
Em hãy viết chương trình pascal nhập một mảng số nguyên gồm n phần tử với n được nhập từ bàn phím in rãi vừa nhập ra màn hình và tính tổng các phần tử trong mảng đưa kết quả ra màn hình.
Viết chương trình nhập một mảng số nguyên gồm n phần tử đưa mảng vừa nhập ra màn hình tính tổng bình phương của các số âm trong một mảng đưa kết quả ra màn hình.
Viết chương trình sử dụng biến mảng để tính tổng các phần tử lớn hơn 0 của dãy N số nhập vào từ bàn phím?
Please, help me!
Viết chương trình nhập vào một mảng gồm n phần tử(0<n<=20) từ bàn phím. Sắp xếp lại bảng theo thứ tự tăng dần đưa mảng trước và sau khi sắp xếp ra màn hình.
Mọi người giúp mình câu này với ạ, mình đang cần gấp: Viết chương trình nhập vào 1 ma trận số nguyên kích thước m x m ô. Tính tổng các phần tử trên đường chéo chính.
Cho mảng b gồm n phần tử được nhập từ bàn phím
a/Tính tổng các phân tử có số chẵn của dãy
b/Tính tổng các phân tử âm của dãy
c/Tìm phần tử lớn nhất và nhỏ nhất của dẫy
d/Tính tổng các phân tử chia hết cho 3 có
