K
Khách

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 i,n:integer;

begin

clrscr;

readln(n);

for i:=1 to n do 

  if i mod 2=1 then write(i:4);

for i:=1 to n do 

  if i mod 2=0 then write(i:4);

readln;

end.

19 tháng 2 2022

có cách nào ngắn hơn không ạ

 

24 tháng 1 2018

Tuyển vợ đây có face nhé

3 tháng 9 2019

Đáp án D

Phenylamin, amoniac, etylamin

10 tháng 2 2019

Đáp án A.

9 tháng 8 2019

Đáp án C

Fe,Al,Mg.

11 tháng 1 2019

Đáp án : A

Nhóm thế hút e làm giảm lực bazơ, nhóm thế đẩy e làm tăng lực bazơ

29 tháng 10 2017

Giải thích: Fe,Al,Mg.

Đáp án C