Viết Chương Trình Nhập Vào N Số Nguyên: Sắp Xếp Theo Thứ Tự Tăng ...
Có thể bạn quan tâm
Quảng cáo
2 câu trả lời 2814
a) tăng dần
program ct;
ues crt;
var A:array [1..1000] of integer;
i,j,n,tg:integer;
begin clrscr;
write('Nhap so phan tu n: '); readln(n);
for i:=1 to n do
begin
writeln('Nhap so thu ',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
tg:=A[i];
A[i]:=A[j];
A[j]:=tg;
end;
writeln('Day so sap xep theo thu tu tang dan la: ');
for i:=1 to n do
write(A[i]:3);
readln;
end.
b) giảm dần
program ct;
ues crt;
var A:array [1..1000] of integer;
i,j,n,tg:integer;
begin clrscr;
write('Nhap so phan tu n: '); readln(n);
for i:=1 to n do
begin
writeln('Nhap so thu ',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
tg:=A[i];
A[i]:=A[j];
A[j]:=tg;
end;
writeln('Day so sap xep theo thu tu giam dan la: ');
for i:=1 to n do
write(A[i]:3);
readln;
end.
...Xem thêm 0 bình luận Đăng nhập để hỏi chi tiếtQuảng cáo
Bạn muốn hỏi bài tập?
Đặt câu hỏiCâu hỏi hot cùng chủ đề
-
hằng là gì ? nêu cú pháp khai báo hằng
Trả lời (19) Xem đáp án » 79954 -
viết chương trình nhập vào 2 số nguyên a và b. In ra màn hình giá trị lớn nhất. Giup mình với ạ
Trả lời (12) Xem đáp án » 60578 - Hỏi từ APP VIETJACK Cú pháp ,cách hoạt động của lệnh lặp for...đó?cho ví dụ minh hoạ Trả lời (8) Xem đáp án » 44980
- Hỏi từ APP VIETJACK Sô biến có thể khai báo tối đa trong 1 chương trình là bao nhiêuA. Chỉ 1 biến cho mỗi kiểu dữ liệuB.Chỉ hạn chế bởi dung lượng bộ nhớC.Không giới hạnD.10 biến Trả lời (21) Xem đáp án » 34450
-
Cú pháp lệnh lặp với số lần chưa biết trước:
A. While < điều kiện > to < câu lệnh >;
B. While < điều kiện > to < câu lệnh 1 > do < câu lệnh 2 >;
C. While < điều kiện > do ;< câu lệnh >;
D. While < điều kiện > do < câu lệnh >;
Từ khóa » Viết Chương Trình Sắp Xếp Mảng Tăng Dần Pascal
-
Sắp Xếp Dãy Số Theo Chiều Tăng Dần
-
Viết Chương Trình Sắp Xếp Dãy Tăng Dần Và Giảm Dần?
-
1,Viết Chương Trình Sắp Xếp Dãy Số Giảm Dần 2,Viết ... - MTrend
-
Sắp Xếp Dãy Số Giảm Dần | VN4000 PASCAL
-
Tài Liệu Sắp Xếp Dãy Số Theo Thứ Tự Tăng Dần Pascal - 123doc
-
Sắp Xếp Dãy Số Theo Chiều Tăng Dần - 123doc
-
Pascal, Sắp Xếp Dãy Số Theo Thứ Tự Giảm Dần Và Tăng Dần, Lập Trình ...
-
Các Bạn Giúp Mình Nhé , Sắp Xếp Dãy Tăng Dần Và Giảm Dần ... - Hoc24
-
Viết Chương Trình Sắp Xếp Mảng A Theo Thứ Tự Tăng Dần , Giảm Dần ...
-
Code Pascal - Tin Hoc 11: Sắp Xếp Mảng 1 Chiều - Code Pascal
-
Viết Chương Trình Nhập Vào Một Mảng Gồm N Số Nguyên. Sắp Xếp Lại ...
-
Lập Trình Pascal: Viết Chương Trình Sắp Xếp Dãy Số Chẵn Lẻ