Program solve;
uses crt;
var n,i,s:integer;
d:array[1..100] of Integer;
Begin
clrscr;
write('Nhap n:'); readln(n);
for i:=1 to n do
begin
write('Nhap d[',i,']:'); readln(d[i]);
if d[i]>0 then s:=s+d[i];
end;
writeln('Tong cac so duong trong day:',s);
readln;
End.
Viết chương trình nhập 1 dãy số nguyên (N<250). Tính tổng các phần tử trong dãy và xuất ra màn hình dãy đó.Đếm số phần tử chẵn trong dãy và xuất ra màn hình.
1. Viết chương trình nhập vào 2 số nguyên dương a,b (a<b). Tính và đưa ra màn hình tổng các số chẵn và tổng các số lẻ trong phạm vi từ a --> b
2. Viết chương trình nhập vào số nguyên dương n (n được nhập tùy ý) xuất ra màn hình các số nguyên lẻ từ 5 --> n (n>=5)
3. Viết chương trình nhập vào 2 số nguyên dương m,n (m<n). Tính và đưa ra màn hình tích của các số nguyên chẵn trong phạm vi từ m --> n
4. Viết chương trình nhập vào 2 số nguyên dương x,y (x<y). Xuất ra màn hình dãy số nguyên dương từ x --> y và y --> x
giúp em với ạ!!!!
Câu 1. Viết chương trình nhập từ bàn phím số nguyên dương N (N≤100) và dãy số nguyên A1, A2, ...AN có trị tuyệt đối nhỏ hơn 1000. Đưa ra màn hình tổng số nguyên chẵn, tổng số nguyên lẻ của dãy số. Với N được nhập từ bàn phím.
Câu 2: Cho dãy A gồm N số nguyên. Viết chương trình in ra màn hình các số nguyên âm có trong dãy? với n được nhập từ bàn phím.
Câu 3. Viết chương trình tính tổng các phần tử chia hết cho 3 trong mảng A gồm n phần tử từ A1, A2 .... An? với n được nhập từ bàn phím.
Câu 4. Viết chương trình nhập từ bàn phím số nguyên dương N (N≤100) và dãy số nguyên A1, A2, ...AN có trị tuyệt đối nhỏ hơn 1000. Đưa ra màn hình số nhỏ nhất của dãy số và vị trí số nhỏ nhất vừa tìm được. Với N được nhập từ bàn phím.
Câu 5. Viết chương trình nhập từ bàn phím số nguyên dương N (N≤100) và dãy số nguyên A1, A2, ...AN có trị tuyệt đối nhỏ hơn 1000. Đưa ra màn hình dãy số nguyên được sắp xếp theo thứ tự giảm dần. Với N được nhập từ bàn phím
cho mảng A gồm N số nguyên dương (A1..An)
a) Xuất ra các phân tử của mảng vừa nhập
b) Tính tổng của các phân tử mảng ở vị trí đầu (nửa dãy đầu)
Cho dãy A gồm n số nguyên dương và 1 số t nguyên dương bất kỳ đc nhập từ bàn phím. lập chương trình tìm t trong dãy A. Nếu tìm thấy thì đưa ra vị trí, nếu ko tìm thấy thì thông báo ko có t trong dãy A.
Giúp e với ạ
VIẾT CHƯƠNG TRÌNH NHẬP VÀO MỘT DÃY N SÔ THỰC (N<= 250).
ĐẾM XEM TRONG DÃY CÓ BAO NHIÊU SỐ VỪA CHIA HẾT CHO 3
VỪA CHIA HẾT CHO 5.
1. KHAI BÁO CÁC BIẾN DÙNG TRONG CHƯƠNG TRÌNH:
2. ĐOẠN CHƯƠNG TRÌNH DƯỚI ĐÂY DÙNG ĐỂ NHẬP DÃY N SỐ
THỰC:
3. ĐOẠN CHƯƠNG TRÌNH DƯỚI ĐÂY DÙNG ĐỂ ĐẾM CÓ BAO NHIÊU
SỐ TRONG DÃY VỪA CHIA HẾT CHO 3 VỪA CHIA HẾT CHO 5:
4. IN KẾT QUẢ VÀ KẾT THÚC CHƯƠNG TRÌNH:
VIẾT CHƯƠNG TRÌNH NHẬP DÃY N SỐ NGUYÊN (N<= 250), TÌM SỐ CÓ GIÁ TRỊ NHỎ NHẤT TRONG DÃY. ĐƯA RA MÀN HÌNH GIÁ TRỊ CỦA SỐ TÌM ĐƯỢC VÀ CÁC ƯỚC SỐ CỦA SÔ ĐÓ.
Nhập vào 1 mảng có N số nguyên ( N< 1000 )
1) Tính tổng các số chia hết cho 3 trong mảng vừa nhập
2) Tìm giá trị nhỏ nhất trong mảng , đưa ra vị trí đó . Nếu có nhiều vị trí chứa giá trị nhỏ nhất thì đưa ra vị trí lớn nhất trong các vị trí đó .
Giúp mình với :
Nhập dãy n phần tử, tìm dãy con tăng ngặt có độ dài lớn nhất.in ra màn hình độ dài, vị trí đầu và vị trí cuối
