uses crt;
var a:array[1..250]of integer;
i,n,min:integer;
begin
clrscr;
write('nhap n='); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
min:=a[1];
for i:=1 to n do
if min>a[i] then min:=a[i];
writeln('so nho nhat la: ',min);
writeln('cac uoc so cua no la: ');
for i:=1 to min do
if min mod i=0 then write(i:4);
readln;
end.
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í đó .
Cho xâu S bất kì chứa các kí số và chữ cái tiếng Anh. Viết chương trình:
a. Đưa ra màn hình tất cả các chữ cái có trong S.
b. Đưa ra màn hình dãy số con tăng liên tiếp dài nhất có trong xâu S.
Ví dụ: S='ab3v5e72f4a7g91b2: có 3 dãy con tăng là (3,5,7); (2,4,7,9);(1,2). Dãy con tăng dài nhất là (2,4,7,9).
Mọi người giúp em với em cần gấp .Em cảm ơn ạ!
Giả sử có bốn số nguyên lưu trong tệp DỮ LIEU.TXT.Hãy viết một chương trình mở tệp đã cho để tính tích của bốn số nguyên đó và đưa kết quả ra màn hình
Viết chương trình nhập từ bàn phím số nguyên dương N
Đưa ra màn hình số lượng các số lẻ chia hết cho 5 trong phạm vi từ 1 đến N (ghi một cách rõ ràng nha )
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
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
#Nhập vào danh sách nhiệt độ cao nhất, thấp nhất trong 7 ngày. Đưa ra màn hình nhiệt độ trung bình của cả tuần đếm số ngày có nhiệt độ thấp hơn 10 độ.
- Xác định bài toán
-Nêu ý tưởng
- viết phương trình
Nhập vào một số nguyên và đưa ra dãy số ngược lại. Vd: 1234 -> 4321
