Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Đỗ Phương Thùy
Xem chi tiết
Nguyễn Lê Phước Thịnh
31 tháng 10 2021 lúc 15:18

Bài 1: 

#include <bits/stdc++.h>

using namespace std;

long long a[100],n,i,j,tam;

int main()

{

cin>>n;

for (i=1; i<=n; i++)

cin>>a[i];

for (i=1; i<=n-1; i++)

for (j=i+1; j<=n; j++)

if (a[i]<a[j]) swap(a[i],a[j]);

for (i=1; i<=n;i++)

cout<<a[i]<<" ";

return 0;

}

Hoài thịnh
Xem chi tiết
Phía sau một cô gái
27 tháng 2 2023 lúc 19:39

var A:

     array[1..n] of integer;

     i, j, n: integer;

begin

     write('Nhap so phan tu cua mang: ');

     readln(n);

     for i := 1 to n do

     begin

          write('Nhap phan tu thu ', i, ': ');

          readln(A[i]);

     end;

 

     for i := 1 to n - 1 do

         for j := i+1 to n do

            if (A[i] mod 2 = 0) and (A[j] mod 2 = 0) and (A[i] < A[j]) or (A[i] mod 2 = 1) and (A[j] mod 2 = 1) and (A[i] > A[j]) then

            begin

                swap(A[i], A[j]);

            end;

     writeln('Mang da sap xep la: ');

      for i := 1 to n do

         writeln(A[i]);

end.

 
trẻ trâu nam
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
2 tháng 5 2019 lúc 17:17

a) Sắp xếp tăng dần theo cao độ: A, C và B

b) Sắp xếp tăng dần theo trường độ: C, A và B

Khánh Nguyên
Xem chi tiết
bui pham phuong Uyen
Xem chi tiết
Nguyễn Lê Phước Thịnh
22 tháng 1 2021 lúc 21:39

1:

uses crt;

var a:array[1..100]of integer;

i,n:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do

  begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to n do 

  write(a[i]:4);

readln;

end.

2: 

uses crt;

var a:array[1..100]of integer;

i,n,j,tam:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do

  begin

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

for i:=1 to n do 

  write(a[i]:4);

readln;

end.

3:

uses crt;

var x,i,max:integer;

begin

clrscr;

repeat

write('Nhap x='); readln(x);

until x>0;

max:=0;

for i:=1 to x do 

  if i mod 2=0 then

begin

if max<=i then max:=i;

end;

writeln('So chan lon nhat khong vuot qua ',x,' la: ',max);

readln;

end.

Trâm
Xem chi tiết
♊Ngọc Hân♊
20 tháng 12 2020 lúc 14:45

Mk chưa học đến bài 5

Ngọc Linh
Xem chi tiết
Minh Lệ
7 tháng 11 2021 lúc 8:40

Input: N và dãy số nguyên a1, a2,..., aN

Ouput: dãy số sắp xếp theo thứ tự tăng dần

B1: Nhập vào n và dãy số nguyên a1, . . . ,aN;

B2: M ← N;

B3: Nếu M<2 thì in dãy đã sắp xếp rồi kết thúc;

B4. M ← M – 1; i ← 0;

B5: i ← i + 1;

B6: Nếu i > M thì quay lại bước 3;

B7. Nếu ai > ai+1 thì tráo đổi cho nhau;

B8: Quay lại bước 5; 

LE THANH HUNG
Xem chi tiết
Hằng Phạm
5 tháng 1 2016 lúc 19:20

-1000 -> -100 -> -43 -> -15 -> 0 -> 105 -> 1000 

Phan Thanh Phú
5 tháng 1 2016 lúc 19:20

Xếp là:-1000;-100;-43;-15;0;105;1000

Lê Phương Thủy
5 tháng 1 2016 lúc 19:20

-1000,-100,-43,-15,0,105,1000