m.n có ai học cấu trúc dữ liệu và giải thuật k giúp mình với. mk chạy thử thuật toán sắp xếp bằng lựa chọn nhưng k ra kết quả

[Seovn]

ở đây, rất nhiều người học rồi. Nhưng mọi người chỉ giải đáp những thắc mắc cụ thể, chứ không ai viết cả một chương trình cho bạn đâu.

View more random threads:

• DEV C++ ko chạy được
• Nhờ tìm lỗi bài lớp Matran thừa kế từ lớp dãy số
• mọi người xem hộ e code này với,nó không chịu chạy
• chương trình chạy mãi mà không dừng lại
• Giải thích về lệnh fscanf(f,"%d",&st)
• thắc mắc về kí tự lạ
• Hiện thực giải thuật FFT cơ số 2 chia theo tần số bằng C
• hàm và các nguyên tắc về hàm
• Kiểm tra số cần may mắn
• Bài tập xâu chuỗi

[haicauhoan]

viết chương trình cho:
- Sắp xếp bằng lựa chọn
- sắp xếp bằng xen vào
- sắp xếp bằng nổi bọt

[YenAngel]

program b1;
const N=100;
type
KeyType= integer;
OtherType=real;
RecordType=Record
Key:KeyType;
OtherFields:OtherType;
end;
var
a:array[1..N] of RecordType;
procedure Swap(var x,y:RecordType);
var
temp:RecordType;
begin
temp:=x;
x:=y;
y:=temp;
end;
procedure SelectionSort;
var
i,j,k:integer;

begin
for i:=1 to n-1 do begin k:=i; for j:=i+1 to n do
if A[i].key<A[k].key then k:=j;
Swap(a[i],a[k]);
end;end;
begin
writeln('Nhap phan tu thu=');
readln;
writeln('day sau khi sap xep');
writeln;
write('done');
readln;
end.