sắp xếp các số thực sau: -3,2;1;\(\frac{-1}{2}\);7,4;0;-1,5 theo thứ tự từ nhỏ dến lớn cưa các giá trị tuyệt đối của chúng
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
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
if a[i]=0 then write(a[i]:4);
for i:=1 to n do
if a[i]<0 then write(a[i]:4);
for i:=1 to n do
if a[i]>0 then write(a[i]:4);
readln;
end.
vgcjghjhcdtfghlihgetsryurtiuyi;jolkm,mnbvcxfdsert6y7uikl,m vcder5t6y7ujikm cxdswe4r567y8uikomnbvgcfxdswae4567890opklmjnbvgcfxdszawqe4rt678uoiklmnjbvcfxdsew4r56789iopl,kmjnbhgfcdre5t67y89uipol;,mnbvgfcder4r56t789i0oplkmjnhgjhbvgfcdfrty7u8ijhghvfcgtgyuijuhghfghujijhghjiuytrdfgygfghjh