Mấy anh chị giúp em với gấp lắm!!!

[magebay]

Tình hình là mai em phải thực hành viết chương trình PASCAL 3 cái này:
1. Khai báo mảng a có n phần tử (n<=100) .Các phần tử thuộc kiểu nguyên.
2. Nhập vào các phần tử của mảng a từ bàn phím.
3. Sắp xếp các phần tử vừa nhập từ nhỏ đến lớn.
Mong các anh chị giúp dùm em. Thanks nhìu...

[seolenchoi]

Sao không ai giúp em hết vậy em cần gấp lắm ạ

[skyeye]

Bạn cần viết = chương trình gì, sau đây mình viết = ngôn ngữ C cơ bản bạn nhé :
#include<stdio.h>
#include<conio.h>
void main()
{
clrscr();
int a[100],n,i,j,max;
puts("Nhap n la so phan tu cua mang");
scanf("%d",&n);
for(i=0;i<n;i++)
{
printf("Nhap a[%d]=",i);
scanf("%d",&a);
}
for(i=0;i<n-1;i++)
for(j=i+1;j<n;j++)
if(a>a[j])
{
max=a;
a=a[j];
a[j]=max;
}
}
}

[fanpckt]

Thanks anh nhưng em học Pascal.Anh làm giúp em nha...

[phamhuanmko]

bài này nếu không nhầm thì trong SGK có mà nhỉ

[chuonggoinhanvien]

pascal

Sặc. Bạn hỏi viết chương trình pascal này lun ah? hay sao

[datlinh1989]

Pascal

iam.hacker44 đã trả lời bằng ngôn ngữ C đó, bạn có thể chuyển về ngôn ngữ Pascal cũng OK thôi.
Tuy nhiên, ở bài lập trình bằng ngôn ngữ C chưa xuất mảng đã sắp xếp ra, như thế cũng bị trừ điểm đó bạn.
Đây là mảng 1 chiều nên khá dễ mà bạn. Như thể này nhé.

Uses: Crt;
var: a: array 1..100 of Interger;
i,j,tam,n: interger;
Begin
clrscr;
//Nhập số phần tử của mảng
Repeat
Writeln ("Nhập số phần tử mãng, số phần tử mảng phải nhỏ hơn 100, nếu không là bị nhập lại đó bạn"); Readln (n);
Until n<=100;
//Nhập các phần tử của mảng
For i:=1 to n do
begin
writeln("phần tử thứ',i,' là:');
Readln(a);
end;
//Sắp xếp các phần tử của mảng
For i:=1 to n-1 do
For j:=i+1 to n do
If a>a[j] then
begin
tam:=a;
a:=a[j];
a[j]:=tam
end;
//Xuất mảng vừa sắp xếp ra màn hình
for i:=1 to n do
write (a',');
writeln;
readln;
end.

Chúc bạn thành công và thi tốt. Nếu không rõ chổ nào thì có thể liên hệ với mình qua yahoo: phongtran052 để mình giải thích rõ hơn trong chương trình. Minh online 23/24 đó bạn. hj:d

[phamthaovnn]

Thanks anh nhưng em học Pascal.Anh làm giúp em nha...

Trong SGK lớp 11 có đoạn code bbsort, bạn tham khảo thử. Trong box cũng có phần quicksort do mình post [IMG]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAAEAAAABAQMAAAA l21bKAAAAA1BMVEXh5PJm+yKVAAAAAXRSTlMAQObYZgAAAApJR EFUCNdjYAAAAAIAAeIhvDMAAAAASUVORK5CYII=[/IMG], nằm trong giải thuật và lập trình của anh Trường (Happysoftgroup).