0
0
Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
2863
21141
program sap_xep_chuso;
uses crt;
var A:array[1..1000] of integer;
n,i:integer;
procedure sx(k:integer);
var B:array[1..10] of byte;
d,j,h,tg:byte;
begin
d:=0;
while k>0 do
begin
d:=d+1;
B[d]:=n mod 10;
n:=n div 10;
end;
for j:=1 to d-1 do
for h:=j+1 to d do
if B[j]<B[h] then
begin
tg:=B[j];
B[j]:=B[h];
B[h]:=tg;
end;
for j:=1 to d do write(B[i]);
write(' ');
end;
BEGIN
clrscr;
write('Nhap n: '); readln(n);
for i:=1 to n do
begin
write('Nhap so thu ',i,': '); readln(A[i]);
end;
for i:=1 to n do sx(A[i]);
readln;
end.
Hãy giúp mọi người biết câu trả lời này thế nào?
4
2
1. Dãy số hay là mảng?
Khi bạn làm bài tập lập trình mà có các cụm từ khóa sau:
Thì cả 3 đề bài này đều là bài toán sắp xếp dữ liệu trên mảng 1 chiều. Khi nhắc tới “dãy số” thì bạn phải nghĩ ngay tới mảng 1 chiều. Dưới đây là 1 số lưu ý tham khảo trước khi tiếp tục đọc bài viết này:
2. Sắp xếp dãy số giảm dần
Trong code mà mình cung cấp dưới đây thì mình sẽ dùng thuật toán sắp xếp chọn – một thuật toán sắp xếp dễ hiểu và dễ cài đặt nhất.
Hãy giúp mọi người biết câu trả lời này thế nào?
0
0
Cảm ơn bạn mình đg cần ý tưởng ạ
4
2
ko co gif
Bảng tin