Program HOC24;
var i,n: integer;
a: array[1..32000] of integer;
ta,td: longint;
begin
write('Nhap so phan tu: '); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
ta:=0; td:=0;
for i:=1 to n do
begin
if a[i]>0 then td:=td+a[i];
if a[i]<0 then ta:=ta+a[i];
end;
writeln('Tong nguyen duong la: ',td);
writeln('Tong nguyen am la: ',ta)
readln
end.
nhập vào một mảng số nguyên tính và đưa ra màng hình tổng số nguyên dương và số nguyên âm
Viết chương trình nhập vào từ bàn phím mảng B gồm N số nguyên (N<=200)và 1 số nguyên dương k:
1. Tính tổng các phần tử lẻ trong mảng A và đưa kết quả ra màn hình?
2. Tính tổng các phần tử là bội của K trong mảng A và đưa kết quả ra màn hình?
Viết chương trình vào 1 mảng số nguyên phải thực hiện các công việc: a). Đếm xem có bao nhiêu phần tử dương và phần tử âm trong mảng b). Tính và đưa ra màng hình tổng các số dương và tổng câc số âm
Viết chương trình nhập vào một mảng gồm n số nguyên a.in ra mảng vừa nhập b.tính và in ra màn hình tổng các cân bậc hai của các số nguyên dương trong mảng vừa nhập
viết chương trình nhập vào mảng một chiều gồm N số nguyên (N<=1000 và mảng A gồm N số nguyên A1,A2,A3,...,An có giá trị tuyệt đối không lớn hơn 1000 hãy đưa ra màng hình những thông tin sau
A nhập mảng
B in mảng
C đếm xem có bao nhiêu phần tử = 0 trong dãy
D tính tổng các phần tử chẵn trong dãy
giúp vs ạ
BT: Viết chương trình nhập vào một dãy N số nguyên dương (N<=150), nhập vào số nguyên dương K.
1. Tìm và đưa ra màn hình số lớn nhất (Max) của dãy vừa nhập, nếu dãy có nhiều số đạt Max thì tính tổng Max và đưa ra màn hình tất cả các vị trí đạt Max.
2. Tìm và đưa ra màn hình số nhỏ nhất (Min) của dãy vừa nhập, nếu dãy có nhiều số đạt Min thì tính tổng Min và đưa ra màn hình tất cả các vị trí đạt Min
3. Đếm và tính tổng các số ở vị trí chẵn là bội của số K trong dãy vừa nhập và đưa kết quả ra màn hình.
4. Đếm và tính tổng các số ở vị trí lẻ là ước của số K trong dãy vừa nhập và đưa kết quả ra màn hình.
5. Số a và số b là anh em của nhau nếu a = b + 1 hoặc b = a + 1. Đếm và tính tổng các số là anh em của K trong dãy vừa nhập và đưa kết quả ra màn hình.
Nhập mảng 1 chiều gồm tối đa là 200 phần tử là số nguyên. Yêu cầu tính và đưa ra màn hình
a. Tổng dương, tổng âm
b. Đếm số lượng số dương, số âm
c. Tính tổng các số ở vị trí lẻ
d. Tính tổng các số ở vị trí lẻ có giá trị chẵn
e. Đưa ra màn hình các số chia hết cho 3
