60 GB = 60 x 1024 (MB) = 61440(MB)

60GB lưu trữ được số quyển sách 300 trang là:

61440 : 8= 7680 (quyển sách)

1:

Program baitap1;

Uses crt;

Var A:array[1..200] of integer;

      S,i:integer;

Begin

Clrscr;

S:=0;

For i:=1 to 10 do

     Begin

     Write('A[',i,']=');

     Readln(A[i]);

     If (A[i] mod 2=1) then S:=S+A[i];

     End;

Writeln('Tong cac phan tu co gia tri le:',S);

Readln

2:

Program baitap2;

Uses crt;

Var A:array[1..200] of integer;

      S,i:integer;

Begin

Clrscr;

S:=0;

For i:=1 to 15 do

     Begin

     Write('A[',i,']=');

     Readln(A[i]);

     If (A[i] mod 2=0) then S:=S+A[i];

     End;

Writeln('Tong cac phan tu co gia tri chan:',S);

Readln

End.

End.

D. Ctrl + U + I

D

Câu 1: 

a. 57b. 19c. 51

 câu 2:a. 1111b. 11011c. 101001

 câu 3 bạn cho mình bài ví dụ về cách được không mình quên rồi

10111010₂ -> 186₁₀

Cách tính : 1.2⁷+0.2⁶+1.2⁵+1.2⁴+1.2³+0.2²+1.2¹+0.2⁰ = 186

186₁₀ -> BA₁₆

Cách tính:

186:16=11 (dư 10) -> A

11:16=0 (dư 11) -> B

10111010₂ -> BA₁₆

1011001011₂ -> ?₁₆  tương tự bài trên bạn nhé

8BC₁₆ -> 2236₁₀

Cách tính: 8.16²+11.16¹+11.16⁰ = 2236

2236₁₀ -> 100010111100₂

Cách tính:

2236:2=1118 (dư 0)

1118:2=559 (dư 0)

559:2=279 (dư 1)

279:2=139 (dư 1)

139:2=69 (dư 1)

69:2=34 (dư 1)

34:2=17 (dư 0)

17:2=8 (dư 1)

8:2=4 (dư 0)

4:2=2 (dư 0)

2:2=1 (dư 0)

1:2=0 (dư 1)

Vậy 8BC₁₆ -> 100010111100₂

Bài dưới cũng tương tự bạn nhé. Mình đã hướng dẫn cách tính rất kĩ rồi nếu bạn vẫn thắc mắc thì phản hồi dưới bài này hoặc nhắn tin cho mình nhé

Lưu ý: khi đổi từ hệ số 10 sang bất kì hệ số nào thì bạn lấy phần dư rồi đảo ngược lại số dư lại nhé.