1,Viết Chương Trình Sắp Xếp Dãy Số Giảm Dần 2 ...

Có thể bạn quan tâm

Tìm×

Tìm kiếm với hình ảnh

Vui lòng chỉ chọn một câu hỏi

Tìm đáp án

- Đăng nhập
- |
- Đăng ký

Hoidap247.com Nhanh chóng, chính xác

Hãy đăng nhập hoặc tạo tài khoản miễn phí!

Đăng nhậpĐăng ký

Đặt câu hỏi

logo

Lưu vào

+
Danh mục mới

Lưu

thuhuong0910
Chưa có nhóm

Trả lời
16
Điểm
994
Cảm ơn
7

Tin Học
Lớp 11
10 điểm
thuhuong0910 - 15:48:54 23/06/2020

1,Viết chương trình sắp xếp dãy số giảm dần 2,Viết chương trình sắp xếp dãy số tăng dần

Hỏi chi tiết
Báo vi phạm

Hãy luôn nhớ cảm ơn và vote 5* nếu câu trả lời hữu ích nhé!

TRẢ LỜI

trangthao118
Chưa có nhóm

Trả lời
1003
Điểm
15884
Cảm ơn
530

trangthao118

Câu trả lời hay nhất!
23/06/2020

Đây là câu trả lời đã được xác thực

Câu trả lời được xác thực chứa thông tin chính xác và đáng tin cậy, được xác nhận hoặc trả lời bởi các chuyên gia, giáo viên hàng đầu của chúng tôi.

program ct;

uses crt;

var i,n,j,tam:integer;

A:array[1..100] of integer;

begin

clrscr;

write('nhap n:=');readln(n);

for i:=1 to n do

begin

write('nhap mang 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;

writeln('day so theo thu tu giam dan la');

for i:=1 to n do

write(A[i],' ');

readln

end.

program ct;

uses crt;

var i,n,j,tam:integer;

A:array[1..100] of integer;

begin

clrscr;

write('nhap n:=');readln(n);

for i:=1 to n do

begin

write('nhap mang 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;

writeln('day so theo thu tu tang dan la');

for i:=1 to n do

write(A[i],' ');

readln

end.

Hãy giúp mọi người biết câu trả lời này thế nào?

avatar

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar5starstarstarstarstar1 voteGửiHủy

Cảm ơn

- trangthao118
- Chưa có nhóm
- Trả lời
  1003
- Điểm
  15884
- Cảm ơn
  530
cho mình câu trả lời hay nhất nha
- thuhuong0910
- Chưa có nhóm
- Trả lời
  16
- Điểm
  994
- Cảm ơn
  7
Làm sao để tính ra cái chỗ để trống ở dòng write thứ ba từ dưới lên ạ
- trangthao118
- Chưa có nhóm
- Trả lời
  1003
- Điểm
  15884
- Cảm ơn
  530
chỗ đó là khoảng cách giữa các số á bạn
- trangthao118
- Chưa có nhóm
- Trả lời
  1003
- Điểm
  15884
- Cảm ơn
  530
in ra các số sẽ điều hơn và đẹp hơn
- thuhuong0910
- Chưa có nhóm
- Trả lời
  16
- Điểm
  994
- Cảm ơn
  7
Sao mình thấy nhiều bài có số ở đấy, vậy là ko cần viết số cũng dc hả bạn
- trangthao118
- Chưa có nhóm
- Trả lời
  1003
- Điểm
  15884
- Cảm ơn
  530
có số cũng được để giống mình cũng được
- thuhuong0910
- Chưa có nhóm
- Trả lời
  16
- Điểm
  994
- Cảm ơn
  7
OK cảm ơn bạn nhiều

Đăng nhập để hỏi chi tiết

Datdoan03
Chưa có nhóm

Trả lời
869
Điểm
24096
Cảm ơn
642

Datdoan03

23/06/2020

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('Mang sap xep theo thu tu giam dan la: ');

for i:=1 to n do

write(A[i]:3);

readln;

end.

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('Mang sap xep theo thu tu tang dan la: ');

for i:=1 to n do

write(A[i]:3);

readln;

end.

Học tốt!

Hãy giúp mọi người biết câu trả lời này thế nào?

avatar

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar5starstarstarstarstar1 voteGửiHủy

Cảm ơn 1
Báo vi phạm

- thuhuong0910
- Chưa có nhóm
- Trả lời
  16
- Điểm
  994
- Cảm ơn
  7
Cái số 3 ở chỗ dòng write(A[i]:3); ý ạ làm sao để ra dc ạ
- NinhNinh1603
- Chưa có nhóm
- Trả lời
  777
- Điểm
  8785
- Cảm ơn
  338
Bạn ơi,khái báo thư viện bạn bị sai từ khóa nha.Uses nhé.Bạn xem xét sửa lại nha