Question

Viết chương trình nhập vào 1 dãy gồm 30 phần tử sắp xếp dãy đó theo thứ tự tăng dần

Answer 1

Program Day_So_Giam_Dan;
Begin
Write(‘a[‘,i,’]= ‘);
End;
Readln;

End.

Answer 2

#include <stdio.h> int main(){    int a[100];    int n;    printf("\nNhap so luong phan tu n = ");    do{        scanf("%d", &n);        if(n <= 0){            printf("\nNhap lai n = ");        }    }while(n <= 0);        for(int i = 0; i < n; i++){        printf("\nNhap a[%d] = ",i);        scanf("%d", &a[i]);    }        // Sap xep dung thuat toan sap xep chon    int tg;    for(int i = 0; i < n - 1; i++){        for(int j = i + 1; j < n; j++){            if(a[i] > a[j]){                // Hoan vi 2 so a[i] va a[j]                tg = a[i];                a[i] = a[j];                a[j] = tg;                    }        }    }            printf("\nMang da sap xep la: ");    for(int i = 0; i < n; i++){        printf("%5d", a[i]);    }        } 

Answer 3

uses crt;

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

i,j,tam:integer;

begin

clrscr;

for i:=1 to 30 do 

  begin

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

end;

for i:=1 to 29 do 

  for j:=i+1 to 30 do 

  if a[i]>a[j] then 

begin

tam:=a[i];

a[i]:=a[j];

a[j]:=tam;

end;

for i:=1 to 30 do 

  write(a[i]:4);

readln;

end.