để máy tính có thể xử lí, thông tin cầ dc biểu diễn dưới dạng :
A . dãy số thập phân
B. dãy các bit gồm các kí hiệu 1G
C . dãy các bit ( dãy nhị phân ) gồm 2 kí hiệu 1 và 0
D . văn bản , hình ảnh , âm thanh
Để máy tính có thể xử lí, thông tin cần được biểu diễn dưới dạng :
A . dãy số thập phân
B. dãy các bit gồm các kí hiệu 1G
C . dãy các bit ( dãy nhị phân ) gồm 2 kí hiệu 1 và 0
D . văn bản , hình ảnh , âm thanh
Để máy tính có thể xử lí, thông tin cần được biểu diễn dưới dạng :
A . dãy số thập phân
B. dãy các bit gồm các kí hiệu 1G
C . dãy các bit ( dãy nhị phân ) gồm 2 kí hiệu 1 và 0
D . văn bản , hình ảnh , âm thanh
Để máy tính có thể xử lí, thông tin cần được biểu diễn dưới dạng :
A . dãy số thập phân
B. dãy các bit gồm các kí hiệu 1G
C . dãy các bit ( dãy nhị phân ) gồm 2 kí hiệu 1 và 0
D . văn bản , hình ảnh , âm thanh
Cho dãy số nguyên a1,a2,...an gồm n phần tử (n<=300) a, Khai báo và đoạn chương trình để nhập số lượng phần tửN các giá trị cho dãy a1,a2,..an?
b,Đếm các phần tử là bội của 3 trong dãy và đưa ra màn hình?
kiểm tra xem dãy trên có phải là cấp số cộng không?
uses crt;
var a:array[1..300]of integer;
i,n,dem,kt,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
dem:=0;
for i:=1 to n do
if a[i] mod 3=0 then inc(dem);
t:=abs(a[2]-a[1]);
kt:=0;
for i:=1 to n do
if t<>abs(a[i]-a[i-1]) then
begin
kt:=1;
break;
end;
if kt=0 then writeln('Day la cap so cong')
else writeln('Day khong la cap so cong');
readln;
end.
II. Bài tập trắc nghiệm
CÂU 1: Dãy bit là dãy chỉ gồm:
A. 0 và 1 B. 2 và 3 C. 4 và 5 D. 6 và 7
CÂU 2: Trong các từ sau, từ nào là từ khóa:
A. real B. write C. begin D. crt
CÂU 3: Quy tắc đặt tên trong ngôn ngữ lập trình gồm:
A. Tên không được trùng với từ khóa
B. Tên khác nhau tương ứng với những đại lượng khác nhau
C. Tên không được bắt đầu bằng chữ số, các kí hiệu đặc biệt và không được chứa
dấu cách
D. Cả ba đáp án trên
CÂU 4: Cấu trúc chung của một chương trình gồm:
A. Phần khai báo B. Phần thân chương trình
C. Cả A và B D. Tất cả đều sai
CÂU 5: Cách chuyển biểu thức ax2 +bx+c sang Pascal nào sau đây là đúng?
A. a*x2 +b*x+c B. a*x*x+b*x+c*x
C. a*x*x +b.x +c*x D. a*x*x + b*x+c
CÂU 6: Biểu thức toán học (a2 + b)(1 + c)3 được biểu diễn trong Pascal như thế nào ?
A. (a*a + b)(1+c)(1 + c)(1 + c) B (a.a + b)(1 + c)(1 + c)(1 + c)
C. (a*a + b)*(1 + c)*(1 + c)*(1 + c) D. (a2 + b).(1 + c)3
CÂU 7: Trong các tên sau đây, đâu là tên ĐÚNG theo quy tắc đặt tên trong ngôn ngữ lập trình:
A. Tamgiac; B. begin; C. 8a; D. dien tich;
CÂU 8: Để nhập dữ liệu từ bàn phím, ta sử dụng lệnh:
A. readl B. read C. Cả A và B đều đúng D. Cả A và B đều sai
CÂU 9: Khi muốn khai báo biến m kiểu số nguyên thì đáp án nào sau đây là ĐÚNG:
A. var m : real ; B. var m : integer ;
C. var m : = real ; D. var m : = integer ;
CÂU 10: Khi muốn khai báo hằng pi và gán giá trị cho hằng pi bằng 3.14 thì đáp án nào sau đây là ĐÚNG:
A. const pi : = 3.14 ; B. const pi = 3.14 ;
C. const pi = : 3.14 ; D. const pi : 3.14 ;
CÂU 11: Để gán giá trị 12 cho biến x ta sử dụng lệnh:
A. x : 12 ; B. x : = 12 ; C. x = : 12 ; D. x = 12 ;
CÂU 12: Hãy cho biết kết quả in ra màn hình khi thực hiện câu lệnh sau:
writeln (‘16 div 3 = ’ , 16 div 3) ;
A. 16 div 3 = B. 16 div 3 = 5 C. 16 div 3 = 16 div 3 D. Tất cả đều sai
* BÀI TẬP TỰ LUẬN
CÂU 1: Em hãy viết các biểu thức toán học sau đây dưới dạng biểu thức trong Pascal: A. \(\dfrac{\left(10+5\right)}{\left(3+1\right)}-\dfrac{18}{\left(5+1\right)}\) B. \(\left(a^2+b\right).\left(1+c\right)^3\)
CÂU 2: Viết chương trình nhập từ bàn phím chiều dài và chiều rộng hình chữ nhật, sau đó tính diện tích và in kết quả diện tích hình chữ nhật ra màn hình?
Hướng dẫn
CÂU 1:
A. (10 + 5) / (3 + 1) – 18 / (5 + 1 )
B. (a*a + b) * (1+c)*(1+c)*(1 +c)
CÂU 2:
Program Dien_tich_HCN;
Uses crt;
Var d, r : integer;
Begin
Clrscr;
Write (‘ Nhap chieu dai: ’); readln (d);
Write (‘ Nhap chieu rong: ’); readln(r);
Write (‘ Dien tich hinh chu nhat la: ’, d*r:4:2);
Readln;
End.
III) ĐÁP ÁN
A- Trắc nhiệm
1. A 7. A
2. C 8. A
3. D 9. B
4. C 10. B
5. D 11. D
6. C 12. B
B- Tự luận
Câu 1: a) (10 + 5) / (3 + 1) – 18 / (5 + 1 )
b) (a*a+b)*(1+c)*(1+c)*(1+c)
Câu 2: Program Dien_tich_HCN;
Uses crt;
Var d, r : integer;
Begin
Clrscr;
Write (‘ Nhap chieu dai: ’); readln (d);
Write (‘ Nhap chieu rong: ’); readln(r);
Write (‘ Dien tich hinh chu nhat la: ’, d*r:4:2);
Readln;
End.
viết chương trình nhập số nguyên dương n. Nhập dãy gồm n số nguyên. Hãy tính tổng các số nằm ở vị trí chẵn trong dãy ?
program im_14424;
uses crt;
var A: array[1..100000] of integer;
S,i,n: integer;
begin
clrscr;
write('Nhap vao n: ');
readln(n);
S:=0;
for i:=1 to n do
begin
write('Nhap A[',i,']: ');
readln(A[i]);
if (A[i] mod 2 = 0 then S:=S+i;
end;
write(S);
readln
end.
Dãy gồm các chất và thuốc đều có thể gây nghiện cho con người là:
A. Cocain; seduxen; cafein
B. Heroin; seduxen; erythromixin
C. Ampixilin, erythromixin, cafein
D. Pemixilin; paradol; cocain
Dãy gồm các kim loại có cấu tạo mạng tinh thể lập phương tâm khối là:
A. Na, K, Mg.
B. Be, Mg, Ca.
C. Li, Na, Ca.
D. Li, Na, K.
Đáp án D
Kim loại nhóm IA (kim loại kiềm) có kiểu tinh thể lập phương tâm khối
Kim loại kiềm thổ: Be, Mg (lục phương); Ca, Sr (lập phương tâm diện); Ba (lập phương tâm khối)
Trong các câu sau câu nào đúng?
1) Loa là một thành phần cơ bản của máy tính.
2) Nhờ có màn hình ta nghe được nhạc phát ra từ máy tính.
3) Nhờ có bàn phím, ta có thể nhập các chữ, số và kí hiệu vào máy tính.
Trong các câu sau câu nào đúng?
1) Loa là một thành phần cơ bản của máy tính.
2) Nhờ có màn hình ta nghe được nhạc phát ra từ máy tính.
3) Nhờ có bàn phím, ta có thể nhập các chữ, số và kí hiệu vào máy tính.
Trong các dãy sau, dãy gồm các chất tác dụng được với dung dịch HCl là
A. MnO2, CuO, H2O
B. Cu, NaOH, AgNO3
C. Mg(OH)2, BaSO4, CaCO3
D. Fe(OH)3, Na2CO3, AgNO3
Cho dãy số: 1;4;7;10;...;2017(1)
a)Tìm số hạng thứ 10;51;201.
b)Tìm số hạng dãy(1).
c)Tính tổng các số dãy(1).
d)Số 2016;2018 có thuộc dãy (1) ko?