Cho 1 dãy số gồm n phần tử n<=15. Giá trị từng phần tử là số thực. Thực hiện các chương trình sau: f) Sắp xếp dãy theo chiều giảm dần về giá trị của từng phần tử

danhthichanhtha01011991

1 năm trước

Loga Sinh Học lớp 12

0 lượt thích 10 xem

1 trả lời

Thích Trả lời

1028619287500110

program solonnhat;

uses crt;

var A:array[1..15] of real;

n,i,j:byte;

tg:real;

begin

clrscr;

write('Nhap so luong phan tu n: '); readln(n);

for i:=1 to n do

begin

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

write('Day sau khi sap xep giam dan la: ');

for i:=1 to n do

write(A[i]:2:2);

readln;

end.

Vote (0) Phản hồi (0) 1 năm trước

691488501281666

Xin hay nhất!

uses crt;
var N,I,J,T:longint; a:array[1..10000000]of longint;
begin
clrscr;
write('n(n<=15)= ');readlN(N);
for i:=1 to n do
begin
write('a[',i,']=');readln(a[i]);
end;
for i:=1 to n do
for j:=1 to i do
if a[i]>a[j] then begin t:=a[i]; a[i]:=a[j]; a[j]:=t; end;
write('Mang sau khi sap xep giam dan: ');
for i:=1 to n do write(a[I],' ');
readln
end.

Vote (0) Phản hồi (0) 1 năm trước

Các câu hỏi liên quan

Cho em nói về quang hải trong bài tiếng anh này

Sự biến đổi hình thái của nhiễm sắc thể trong phân bào nguyên phân được biểu hiện qua sự đóng và duối xoắn diễn ra ở các kì như thế nào? Tại sao nói sự đóng và duỗi xoắn của nhiễm sắc thể có tính chất chu kỳ ? Ý nghĩa của sự đóng xoắn và duỗi xoắn

Cho 1 dãy số gồm n phần tử n<=15. Giá trị từng phần tử là số thực. Thực hiện các chương trình sau: d) Tìm phần tử có giá trị lớn nhất của dãy

Suy nghĩ cảm nhận của em về câu truyện "bàn tay cô giáo" các anh,cj giúp em vs ạ Ko chép mạng ạ!!!

Cho đường tròn (O) hai dây AB và CD , AD và BC cắt nhau tại I nằm bên trong đường tròn, AB và CD cắt nhau tại E nằm bên ngoài đường tròn. Đường thẳng kẻ qua E song song với AD cắt CB tại F. Qua F vẽ tiếp tuyến FG với đường tròn (O). CMR: a) Góc EFC= Góc ABD + Góc CAD b) EF=FG

Để mang lại hạnh phúc cho cha mẹ, em phải làm gì? “ Cha mẹ là người có thể thay thế tất cả người khác, nhưng không người nào có thể thay thế đươc cha mẹ”. Anh/chị hãy trình bày suy nghĩ của mình về câu nói trên?

5 sao cho ai trả lời nhanh và đúng!!

Giải hộ mik ghi rõ bước hứa vote

Vẽ con lợn :v p/s: ai chơi ff khum zậy :<

viết thư cho cuộc thi viết thư upu lần thứ 50 với chủ đề viết một bức thư gửi cho người thân về trải nghiệm của em đối với đại dịch covid 19 . P/S : k chép mạng :)

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến