46/  B. Chọn dạng biểu đồ    

47/ D. Cả A,B,C đều đúng

48/ A. Layout

49/   C. Chart Title 

50/  C. Chart Title    

51/  C. Chart Title    

52/ D. Delete

46/  B. Chọn dạng biểu đồ    

47/ D. Cả A,B,C đều đúng

48/ A. Layout

49/   C. Chart Title 

50/  C. Chart Title    

51/  C. Chart Title    

52/ D. Delete

46/  B. Chọn dạng biểu đồ 

47/ D. Cả A,B,C đều đúng

- Càng lên vĩ độ cao thì góc nhập xạ càng nhỏ nên nhiệt độ trung bình năm càng giảm.
-biên độ nhiệt tăng là do nhiệt độ tháng nóng nhất vs tháng lạnh nhất chênh nhau lớn.

trong khi chuyển động xung quanh Mặt Trời, trục Trái Đất nghiêng và không đổi phương. do đó càng đi về cực,bien độ nhiệt càng lớn
ví dụ ở cực bắc có 6 tháng ko đc mt chiếu sáng nên nhiệt độ rất thấp,và lại có 6 tháng mùa hè,băng tan và có nhiệt độ cao
còn ở vugf xích đạo,nhiệt độ nóng quanh năm nên biên độ nhiệt chênh ít,khoảng từ 2-3 độ__________________

- Càng lên vĩ độ cao thì góc nhập xạ càng nhỏ nên nhiệt độ trung bình năm càng giảm.
-biên độ nhiệt tăng là do nhiệt độ tháng nóng nhất vs tháng lạnh nhất chênh nhau lớn.

trong khi chuyển động xung quanh Mặt Trời, trục Trái Đất nghiêng và không đổi phương. do đó càng đi về cực,bien độ nhiệt càng lớn
ví dụ ở cực bắc có 6 tháng ko đc mt chiếu sáng nên nhiệt độ rất thấp,và lại có 6 tháng mùa hè,băng tan và có nhiệt độ cao
còn ở vugf xích đạo,nhiệt độ nóng quanh năm nên biên độ nhiệt chênh ít,khoảng từ 2-3 độ __________________

TẠI NHÀ SẢN XUẤT ĐẶT NHƯ VẬY

uses crt;

var a,b,x,y:integer;

//chuongtrinhcon

function ucln(var a,b:integer):integer;

var r:integer;

begin

while b>0 do

begin

r:=a mod b;

a:=b;

b:=r;

end;

ucln:=a;

end;

//chuongtrinhchinh

begin

clrscr;

readln(a,b);

x:=a;

y:=b;

if (x>0) and (y>0) then writeln(x div ucln(a,b),' ',y div ucln(a,b));

if (x<0) and (y<0) then 

begin

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end; 

if (x<0) and (y>0) then 

begin

write('-');

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end;

if (x>0) and (y<0) then 

begin

write('-');

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end;

readln;

end.

Tham khảo:

Sắp xếp nổi bọt

=> Ưu điểm:

• Là thuật toán cơ bản, dễ hiểu, phù hợp cho người bắt đầu học về sắp xếp

• Đoạn code ngắn gọn, dễ nhớ.

Sắp xếp chèn tuyến tính

=> Ưu điểm:

Thao tác thực hiện đơn giản, dễ hiểu.

Thể hiện sự hiệu quả cao đối với các số liệu nhỏ.

Tại các tình huống thực tế, Insertion Sort tỏ ra hiệu quả hơn so với các thuật toán có độ phức tạp khác (ví dụ Bubble sort).

Rất phù hợp đối với các số liệu đã được sắp xếp theo thứ tự sẵn.

Tính ổn định, không làm thay đổi nhiều thứ tự các nguyên tố gốc.

Cách sắp xếp có tính phương pháp, tuân theo nguyên tắc cụ thể, dễ nhớ và sử dụng.

uses crt;

var a,b,x,y:integer;

//chuongtrinhcon

function ucln(var a,b:integer):integer;

var r:integer;

begin

while b>0 do

begin

r:=a mod b;

a:=b;

b:=r;

end;

ucln:=a;

end;

//chuongtrinhchinh

begin

clrscr;

readln(a,b);

x:=a;

y:=b;

if (x>0) and (y>0) then writeln(x div ucln(a,b),' ',y div ucln(a,b));

if (x<0) and (y<0) then 

begin

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end; 

if (x<0) and (y>0) then 

begin

write('-');

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end;

if (x>0) and (y<0) then 

begin

write('-');

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end;

readln;

end.

uses crt;

var a,b,x,y:integer;

//chuongtrinhcon

function ucln(var a,b:integer):integer;

var r:integer;

begin

while b>0 do

begin

r:=a mod b;

a:=b;

b:=r;

end;

ucln:=a;

end;

//chuongtrinhchinh

begin

clrscr;

readln(a,b);

x:=a;

y:=b;

if (x>0) and (y>0) then writeln(x div ucln(a,b),' ',y div ucln(a,b));

if (x<0) and (y<0) then 

begin

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end; 

if (x<0) and (y>0) then 

begin

write('-');

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end;

if (x>0) and (y<0) then 

begin

write('-');

x:=abs(x);

y:=abs(y);

a:=abs(a);

b:=abs(b);

writeln(x div ucln(a,b),' ',y div ucln(a,b));

end;

readln;

end.