Bài 8. Lặp với số lần chưa biết trước

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
hoho209

1/Viết chương trình nhập vào một mảng số nguyên sắp xếp lại mảng đó theo thứ tự giảm dần

2/ Viết chương trình cho phép nhập vào 1 mảng gồm N phần tử, cho biết số nhỏ nhất trong các số vừa nhập là số thứ mấy

giúp em với ak

Nguyễn Lê Phước Thịnh
18 tháng 3 2021 lúc 23:30

Bài 1: 

uses crt;

var a:array[1..100]of integer;

i,n,tam,j:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to n-1 do

for j:=i+1 to n do 

if a[i]<a[j] then 

begin

tam:=a[i];

a[i]:=a[j];

a[j]:=tam;

end;

for i:=1 to n do 

  write(a[i]:4);

readln;

end.

hoho209
19 tháng 3 2021 lúc 0:35

Làm giúp em câu 2 với ạ


Các câu hỏi tương tự
Joc Bok
Xem chi tiết
Nguyễn Thị Ngọc Oanh
Xem chi tiết
huy123
Xem chi tiết
Huyen Dinh phuong
Xem chi tiết
nhan tran
Xem chi tiết
Mỹ Trinh
Xem chi tiết
Phạm Tiến
Xem chi tiết
Trầm tiến
Xem chi tiết
NGUYỄN LÊ XUÂN THỊNH
Xem chi tiết