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.

Câu 1: B

Câu 2: D

Câu 3: B

Câu 4: D

Câu 5: B

Câu 6: A

Câu 7: Không có câu nào đúng

Câu 8: A

10 tháng 4 2020

1A chứ

25 tháng 3 2022
16 tháng 3 2023

S từ đâu ra vậy ? 

 

1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26 2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); * A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến 20; 3, Trong...
Đọc tiếp
1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26

2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); *

A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến 20;

3, Trong câu lệnh lặp For i:=3 to 15 do s:=s+i; Có bao nhiêu vòng lặp? *

A. 15; B. 12; C. 13 D. 3;

4, Cho k,m,n nhận giá trị tương ứng 4,5,6; kết thúc câu lệnh sau:X:=n; If ((x mod 2=0)) or (x<=5) then x:=m*k else x:=m div k; thì x có giá trị là ? *

A. 1 B. 0 C. 5. D. 20 5, Cho biết đoạn chương trình Pascal sau đây chương trình thực hiện bao nhiêu vòng lặp?s:=0; n:=0; while s<=5 do n:= n+1;s:= s+n; * A. 3 B. 6 C. 10 D. kết quả khác 6, Cho a,b,c lần lượt nhận giá trị 10,30,20 . Hỏi sau đoạn chương trình Begin X:=a; If x>a then x:=a; if x>b then x:=b;if x>c then x:=c;end; x có giá trị là? * A. 20 B. 10 C. 30 D. Cả ba đáp án đều sai. 7, Cho x:=7; kết thúc câu lệnh If ((x mod 3=0)) and (x<=8) then x:=x+10; thì x có giá trị là ? * A. 8 B. 10 C. 17 D. 7 8, Cho s và i là biến nguyên. Khi chạy đoạn chương trình s := 1; for i:=1 to 5 do s := s+i; Kết quả in lên màn hình là của s là ? * A. 15 B. 16 C. 11 D. 22 9, Cho biết đoạn chương trình Pascal sau đây, khi kết thúc giá trị của S bằng bao nhiêu? S:=0; n:=0;while S<=3 do begin n:= n+1;S:= s+n; end; * A. 15 B. 10 C. 6 D. 3
1
10 tháng 12 2020

1. C

2. D

3. C

4. D

5. D

6. B

7. D

8. B

9. C

 

26 tháng 2 2022

Sai

Câu 1: Đoạn chương trình sau cho kết quả gì? For i:=1 to 10 do write(i,' ); A.12 3 4 5 6 7 89 10 B.Đưa ra 10 khoảng trắng C.Không có kết quả D.1098 7 6 5 4 3 2 1 Câu 2: Đoạn chương trình sau cho kết quả gì? For i:=5 to 10 do write('i'); A.iiiii B.5678910 C.i D.iii Câu 3: Đoạn chương trình sau cho kết quả gì? For i:=5 to 10 do If i mod 5 = 0 then write (i); Diiiii A.1 2 3 4 5 B.1 2 3 4 5 6 7 8 9 10 C.5 10 Câu 4: Đoạn chương trình sau cho kết quả...
Đọc tiếp

Câu 1: Đoạn chương trình sau cho kết quả gì? For i:=1 to 10 do write(i,' );
A.12 3 4 5 6 7 89 10
B.Đưa ra 10 khoảng trắng
C.Không có kết quả
D.1098 7 6 5 4 3 2 1
Câu 2: Đoạn chương trình sau cho kết quả gì? For i:=5 to 10 do write('i');
A.iiiii
B.5678910
C.i
D.iii
Câu 3: Đoạn chương trình sau cho kết quả gì?
For i:=5 to 10 do
If i mod 5 = 0 then write (i);
Diiiii
A.1 2 3 4 5
B.1 2 3 4 5 6 7 8 9 10
C.5 10
Câu 4: Đoạn chương trình sau cho kết quả gì?
S:=1; For i:=5 to 10 do if i mod 3 = 0 then S:=S * i; Write(S);
A.54
B.15
C.50
D.151200
Câu 5: Cho đoạn chương trình sau:
a:=3; b:=2;
If a>b then a:=4 else b:=1;
Sau khi thực hiện đoạn chương trình trên cho kết quả:
A.a=3
B.b=2
C.a=4
D.b=1
Câu 6: Đoạn chương trình sau cho kết quả gì?
S:=0;
For i:=1 to 9 do S:=S+i;
Write(s);
A.45
B.40
C.55
Câu 7: Cho x là biến thực đã được gán giá trị 13.56423. Để hiện lên màn hình nội dung “x=13.6"
cần chọn câu lệnh nào sau đây?
A.Writeln(x:5);
B.Writeln(x);
C.Writeln("x=",x:5:2);
D.Writeln('x=',x:2:1);
Câu 8: Trong NNLT Pascal phát biểu nào sau đây là đúng:
A.Có phân biệt chữ hoa chữ thường.
B.Sau mỗi câu lệnh đều phải có dấu chấm phẩy.
C.Trước lệnh Else bắt buộc phải có dấu chấm phẩy.
D.Lệnh Readln trước câu lệnh End. Không nhất thiết phải có dấu chấm phẩy.
Câu 9: Để thoát khỏi chương trình Pascal ta sử dụng tổ hợp phím nào?
A.Ctrl + Q
B.Ctrl + X
C.Alt + Q
D.Alt +X
Câu 10: Vòng lặp sau đây lặp lại mấy lần?
A:=2
For i:=0 to 7 do a:=a+1;
A.6
B.7
C.8

0
I. TRẮC NGHIỆM: Khoanh tròn vào đáp án mà em cho là đúng nhất ở các câu trả lời bên dưới: Câu 1: Chương trình dịch làm gì ? A. Dịch từ ngôn ngữ lập trình sang ngôn ngữ máy. B. Dịch từ ngôn ngữ lập trình sang ngôn ngữ tự nhiên C. Dịch từ ngôn ngữ máy sang ngôn ngữ lập trình D. Dịch từ ngôn ngữ máy sang ngôn ngữ tự nhiên. Câu 2: Đâu là các từ khoá: A. Program, end, begin. B. Program, end, begin, Readln, lop82 C. Program, then, mot,...
Đọc tiếp

I. TRẮC NGHIỆM:
Khoanh tròn vào đáp án mà em cho là đúng nhất ở các câu trả lời bên
dưới:
Câu 1: Chương trình dịch làm gì ?
A. Dịch từ ngôn ngữ lập trình sang ngôn ngữ máy.
B. Dịch từ ngôn ngữ lập trình sang ngôn ngữ tự nhiên
C. Dịch từ ngôn ngữ máy sang ngôn ngữ lập trình
D. Dịch từ ngôn ngữ máy sang ngôn ngữ tự nhiên.
Câu 2: Đâu là các từ khoá:
A. Program, end, begin.
B. Program, end, begin, Readln, lop82
C. Program, then, mot, hai,ba
D. Lop82, uses, begin, end
Câu 3: Program là từ khoá dùng để:
A. Khai báo tiêu đề chương trình B. Kết thúc chương trình
C. Viết ra màn hình các thông báo D. Khai báo biến
Câu 4: Tên nào đúng ?
A. Lop 8a B. Lop8/a C. Lop8a D. 8a
Câu 5: Tên nào sai ?
A. Chuong_trinh B. Baitap1
C. A4H D. hoa@yahoo.com
Câu 6: Cấu trúc của chương trình Pascal gồm những phần nào?
A. Khai báo B. Khai báo và thân
C. Tiêu đề, khai báo và thân D. Thân
Câu 7: Trong các tên sau đây, tên nào là không hợp lệ trong ngôn ngữ Pascal?
A. TINHS B. DIENTICH
C. DIEN TICH D. TIMS
Câu 8: Để thoát khỏi Pascal ta sử dụng tổ hợp phím:
A. Alt + F9 B. Alt +X C. Ctrl+ F9 D. Ctrl + X
Câu 9: Kết quả in ra màn hình của câu lệnh Writeln(‘5+20 = ‘, 20+5); là:
A. 5+20=25 B. 5+20=20+5 C. 20+5=25 D. 25 = 25
Câu 10: Phần nguyên trong phép chia của hai số nguyên 16 và 5 là:
A. 16 div 5 = 1 B. 16 mod 5 = 1
C. 16 div 5 = 3 D. 16 mod 5 = 3
Câu 11: Trong Pascal, lệnh clrscr được dùng để
A. Xóa màn hình B. In thông tin ra màn hình
C. Nhập dữ liệu từ bàn phím D. Tạm dừng chương trình
Câu 12: Từ khóa dùng để khai báo hằng trong ngôn ngữ lập trình Pascal là:
A. Const B. Var
C. Real D.End
Câu 13: Để dừng chương trình nhập dữ liệu ta dùng lệnh

A. Clrscr; B. Readln(x);
C. X:= ‘dulieu’; D. Write(‘Nhap du lieu’);
Câu 14: Trong chương trình Turbo Pascal, tổ hợp phím Alt + F9 dùng để:
A. Dịch chương trình. B. Lưu chương trình.
C. Chạy chương trình. D. Khởi động chương trình
Câu 15: Trong chương trình Turbo Pascal từ khoá dùng để khai báo tên chương trình
là:
A. uses. B. Begin C. Program. D. End
Câu 16: Trong các tên sau, tên nào là hợp lệ trong ngôn ngữ Pascal:
A. Dien tich; B. Begin;
C. Tamgiac; D. 5-Hoa-hong;
Câu 17: Để tìm giá trị lớn nhất của 2 số a, b thì ta viết:
A. Max:=a;If b>Max then Max:=b;
B. If (a>b) then Max:=a;If (b>a) then Max:=b;
C. Max:=b;If a>Max then Max:=a;
D. Cả 3 câu đều đúng.
Câu 18: IF a>8 THEN b:=3 ELSE b:=5; Khi a nhận giá trị là 0 thì b nhận giá trị
nào?
A. 0 B. 5 C. 8 D. 3
Câu 19: Khi một chương trình Pascal hết lỗi, ta muốn chạy chương trình thì
nhấn phím:
A. F9 B. Ctrl + F9 C. F2 D. Ctrl + F2

Câu 20: Viết biểu thức toán a3- b3 sang Pascal thì ta viết là:

A. a3-b3 B. a*a*a-b*b*b
C. a.a.a-b.b.b D. aaa-bbb

Câu 21: Để thực hiện phép tính tổng của hai số nguyên a và b ta thực hiện như
sau :
A. Tong=a+b; B. Tong:=a+b;
C. Tong:a+b; D. Tong(a+b);
Câu 22: Câu lệnh điều kiện dạng đầy đủ là:
A. If < đk > then < câu lệnh 1> Else <câu lệnh 2>;
B. If <đk > then < câu lệnh>;
C. If <đk> then < câu lệnh 1>,<câu lệnh 2>;
D. Cả a,b,c đều sai.
Câu 23: Trong ngôn ngữ lập trình Pascal, từ không phải từ khóa là:
A. Uses B. Program C. End D. Computer
Câu 24: Dãy kí tự 20n10 thuộc kiểu dữ liệu
A. String B. Integer C. Real D. Char
Câu 25: Để chạy một chương trình Pascal ta nhấn tổ hợp phím
A. Ctrl+F9 B. Alt+F9
C. Shitf+F9 D. Ctrl+Shift+F9
Câu 26: Cấu trúc chung hợp lý của một chương trình Pascal là:
A. Begin -> Program -> End. B. Program -> End -> Begin.
C. End -> Program -> Begin. D. Program -> Begin -> End.
Câu 27: Phần dư trong phép chia của hai số nguyên 16 và 5 là:
A. 16 div 5 = 1 B. 16 mod 5 = 1

C. 16 div 5 = 3 D. 16 mod 5 = 3
Câu 28: A được khai báo là biến với kiểu dữ liệu số nguyên, X là biến với kiểu
dữ liệu xâu. Phép gán hợp lệ là:
A. A:= 4.5; B. X:= ‘1234’; C. X:= 57; D. A:=‘LamDong’;
Câu 29: Trong Pascal khai báo nào sau đây là đúng:
A. Var hs : real; B. Var 5hs : real;
C. Const hs : real; D. Var S = 24;
Câu 30: Chương trình sau cho kết quả là gi ?
Program vd;
Var a, b,: real; x,: integer ;
Begin readln(a, b);
If a>b then x:=a else x:=b;
Write(x);
End.
A. Xuất ra màn hình số nhỏ nhất trong 2 số a, b đã nhập
B. Xuất ra màn hình số lớn nhất trong 2 số a, b đã nhập
C. Chương trình không thực hiện được do lỗi khai báo kiểu dữ liệu
D. Đảo giá trị của 2 biến a, b cho nhau
Câu 31: Câu lệnh nào sau đây dùng để nhập một số từ bàn phím vào biến x?
A. Writeln(‘Nhập x = ’); B. Write(x);
C. Writeln(x); D. Readln(x);
Câu 32: Câu lệnh nào sau đây dùng để in giá trị lưu trong biến x ra màn hình?
A. Writeln(x); B. Write(x);
C. Write(x: 3); D. Cả A, B, C đều đúng
Câu 33: Trong Pascal, muốn dịch chương trình ta dùng tổ hợp phím nào sau đây:
A. Alt + F9 B. Ctrl + F9 C. Alt + F3 D. Ctrl + S
Câu 34: Số biến có thể khai báo tối đa trong một chương trình là bao nhiêu?
A. Chỉ một biến cho mỗi kiểu dữ liệu. B. 10 biến.
C. Chỉ hạn chế bởi dung lượng bộ nhớ. D. Không giới hạn.
Câu 35: Trong Pascal, để lưu chương trình mới gõ ta nhấn phím?
A. Nhấn phím F1 B. Nhấn phím F2
C. Nhấn phím F3 D. Nhấn phím F4
Câu 36: Trong Pascal, câu lệnh Writeln(16 mod 3) sẽ in lên màn hình kết quả là
bao nhiêu?
A. Kết quả là 5 B. Kết quả là 1
C. Kết quả là 16 D. Kết quả là 3
Câu 37: Phép toán (105 div 10 + 105 mod 5) có giá trị là:
A. 5 B. 0 C. 15 D. 10
Câu 38: Các thành phần cơ bản của một ngôn ngữ lập trình gồm:
A. Bảng chữ cái và các quy tắc để viết các câu lệnh.
B. Bảng chữ cái và các từ khoá
C. Các từ khoá và tên
D. Bảng chữ cái, các từ khoá và tên
Câu 39.Nếu ta dùng số Pi= 3.14, để tính chu vi đường tròn thì ta dùng từ khóa
nào để khai báo ?
A. Program B. Uses C. Var D.Const

Câu 40: Chọn câu lệnh Pascal hợp lệ trong các câu sau :
A. If x : = a + b then x : = x + 1;
B. If a > b then max = a;
C. If a > b then max : = a ; else max : = b;
D. If 5 = 6 then x : = 100;
II. TỰ LUẬN
Bài 1. Viết chương trình nhập một số nguyên dương có 2 chữ số. Cho biết số
vừa nhập là số chẵn hay số lẻ.
Bài 2. Viết chương trình nhập một số nguyên dương n. Hãy xuất ra màn hình
bảng cửa chương n.
Bài 3. Viết chương trình nhập một số nguyên dương n. Hãy liệt kê tất cả các ước
số lẻ của số nguyên dương n.

MONG NHẬN ĐƯỢC SỰ GIÚP ĐỠ TỪ CÁC BẠN !!!

0
17 tháng 3 2022

6.D

7.D

17 tháng 3 2022

Câu 6 :D

17 tháng 3 2022

6.D

7.C

I. Phần trắc nghiệm: Hãy chọn một đáp án đúng nhất. Câu 1. Trong Pascal, câu lệnh nào sau đây được viết đúng? A. for i:= 4 to 1 do writeln(‘A’); B. for i= 1 to 10 writeln(‘A’); C. for i:= 1 to 10 do writeln(‘A’); D. for i to 10 do writeln(‘A’); Câu 2. Trong câu lệnh lặp: For i := 1 to 10 do j:= j + 2; write( j ); Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần? A. 10 lần B. 5 lần C. 1 lần D. Không thực...
Đọc tiếp

I. Phần trắc nghiệm: Hãy chọn một đáp án đúng nhất.
Câu 1. Trong Pascal, câu lệnh nào sau đây được viết đúng?
A. for i:= 4 to 1 do writeln(‘A’); B. for i= 1 to 10 writeln(‘A’);
C. for i:= 1 to 10 do writeln(‘A’); D. for i to 10 do writeln(‘A’);
Câu 2. Trong câu lệnh lặp: For i := 1 to 10 do j:= j + 2; write( j );
Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần?
A. 10 lần B. 5 lần C. 1 lần D. Không thực hiện.
Câu 3. Cho đoạn chương trình: J:= 0;
For i:= 1 to 5 do J:= j + i;
Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?
A. 12 B. 22 C. 15 D. 42.
Câu 4: Cú pháp của câu lệnh điều kiện dạng đủ nào sau đây là đúng?
A. If <điều kiện> then <câu lệnh 1> else <câu lệnh 2> B. If <câu lệnh> then <điều kiện>
C. If <điều kiện> then <câu lệnh 1> else <câu lệnh 2> D. If &lt;điều kiện&gt; do &lt;câu lệnh&gt;;
Câu 5: Chương trình sau cho kết quả gì?
Program VD;
Var a, b: Real; x: Integer;
Begin
Readln( a,b);
If a>b then x:=a else x:=b;
Writeln(x);
End.
A.Xuất ra màn hình số nhỏ nhất trong 2 số a, b đã nhập.
B.Xuất ra màn hình số lớn nhất trong hai số a, b đã nhập.
C.Chương trình không thực hiện được do lỗi khai báo kiểu dữ liệu.
D.Đảo giá trị của hai biến a, b cho nhau.
Câu 6: Hoạt động nào sau đây lặp với số lần lặp biết trước?
A. Rửa rau tới khi sạch B. Học bài cho tới khi thuộc bài
C. Gọi điện tới khi có người nghe máy D. Ngày tắm 2 lần
Câu 7: Cấu trúc câu lệnh điều kiện dạng thiếu là:
A. If <điều kiện> then <câu lệnh 1> esle <câu lệnh 2> B. If <điều kiện> then <câu lệnh >
C. If <điều kiện> then <câu lệnh 1> <câu lệnh 2> D. If <điều kiện> then <câu lệnh 1> esle <câu lệnh 2>
Câu 8: Ta có 2 lệnh sau:
x := 8;
IF x > 5 then x := x+1;
Giá trị của x nhận được là bao nhiêu?
A. 5 B. 7 C. 8 D. 9
Câu 9: Chọn câu lệnh Pascal hợp lệ trong các câu lệnh sau:
A. If a > b then max = a ; B. If a := b then max = b ;
C. If a = b then S := a+b ; D. If a <> b then b=a;
Câu 10: Chọn cú pháp đúng nhất về câu lệnh lặp:
A. for < biến đếm > : = < giá trị đầu > to < giá trị cuối > do < câu lệnh >
B. for < biến đếm > := < giá trị cuối > to < giá trị đầu > do <câu lệnh >

C. for <biến đếm > : = < giá trị đầu > to < giá trị cuối > do < câu lệnh >
D. for < biến đếm > : = < giá trị đầu > to < giá trị cuối > do < câu lệnh >
Câu 11: Em hiểu lệnh lặp theo nghĩa nào dưới đây?
A. Một lệnh thay cho nhiều lệnh B. Các câu lệnh được viết lặp đi lặp lại nhiều lần
C. Vì câu lệnh có tên là lệnh lặp D. Cả (A), (B), (C) đều sai
Câu 12: Khi nào thì câu lệnh For..to..do kết thúc?
A. Khi biến đếm nhỏ hơn giá trị cuối B. Khi biến đếm lớn hơn giá trị cuối
C. Khi biến đếm nhỏ hơn giá trị đầu D. Khi biến đếm lớn hơn giá trị đầu

Câu 13: Cho các câu lệnh sau hãy chỉ ra câu lệnh đúng?
A. for i:=1 to 10; do x:=x+1; B. for i:=1 to 10 do x:=x+1;
C. for i:=10 to 1 do x:=x+1; D. for i =10 to 1 do x:=x+1;
Câu 14: Với ngôn ngữ lập trình Passcal câu lệnh lặp for i:=1 to 10 do x:=x+1; thì biến đếm i phải
được khai báo là kiểu dữ liệu nào?
A. Integer B. Real C. String D. Tất cả các kiểu trên đều được
Câu 15: Trong câu lệnh lặp với số lần biết trước (For – do), được thực hiện mấy lần?
A. ( < giá trị cuối > - < giá trị đầu >) lần B. Tuỳ thuộc vào bài toán mới biết được số lần
C. Khoảng 10 lần D. ( < giá trị đầu > - < giá trị cuối>) lần
Câu 16: Xác định số vòng lặp cho bài toán: tính tổng các số nguyên từ 1 đến 100
A. 1 B. 100 C. 99 D. Tất cả đều sai
Câu 17: Kết quả của &lt; điều kiện &gt; trong câu lệnh sẽ có giá trị là gì?
A. Là một số nguyên B. Là một số thực C. Đúng hoặc sai D. Là một dãy kí tự
Câu 18: Sau khi thực hiện đoạn chương trình sau:
S:=0; For i:=1 to 5 do S:=S+i; Giá trị của biến S bằng bao nhiêu?
A. 20 B. 15 C. 10 D. 0
Câu 19: Cú pháp lệnh lặp For – do dạng lùi:
A. for < biến đếm> = < Giá trị cuối >downto < Giá trị đầu > do < câu lệnh >
B. for < biến đếm> := < Giá trị cuối >downto < Giá trị đầu > do < câu lệnh >
C. for < biến đếm> = < Giá trị cuối >down < Giá trị đầu > do < câu lệnh >
D. for < biến đếm> := < Giá trị đầu >downto < Giá trị cuối > do < câu lệnh >
Câu 20: Trong lệnh lặp For – do: (chọn phương án đúng nhất)
A. Giá trị đầu phải nhỏ hơn giá trị cuối
B. Giá trị đầu phải nhỏ hơn hoặc bằng giá trị cuối
C. Giá trị đầu phải lớn hơn giá trị cuối D. Giá trị đầu phải bằng giá trị cuối
Câu 21: Lệnh lặp For – do được sử dụng khi:
A. Lặp với số lần biết trước B. Lặp với số lần chưa biết trước
C. Lặp với số lần có thể biết trước D. Lặp với số lần không bao giờ biết trước
Câu 22: Sau khi thực hiện đoạn chương trình sau: s:=1; for i:= 1 to 3 do s:= s*i;
Giá trị của biến s bằng bao nhiêu?
A. 10; B.5; C. 6; D. 15.
Câu 23: Với câu lệnh for i:=1 to 10 do x:=x+1; biến i được khai báo thuộc kiểu dữ liệu nào?
A. Real; B. Integer; C. String; D. Char.
Câu 24: Lệnh lặp for..to..do của Pascal trong mỗi vòng lặp, biến đếm thay đổi như thế nào?
A. Tăng thêm 1 đơn vị; B. +1 hoặc -1;
C. Giá trị bất kì; D. Một giá trị khác 0.

II: Bài tập: Tính tổng các số tự nhiên đầu tiên chia hết cho 3 không vướt quá N cho trước (N được
nhập vào từ bàn phím).

MONG NHẬN ĐƯỢC SỰ TRỢ GIÚP TỪ CÁC BẠN !!!

1

I: Trắc nghiệm

Câu 1: C

Câu 2: A

Câu 3: C

Câu 4: C

Câu 5: C

Câu 6: D

Câu 7: B

Câu 8: D

Câu 9: C

Câu 10: B

Câu 11: D

Câu 12: B

Câu 13: B

Câu 14: A

Câu 15: B

Câu 16: B

Câu 17: Không rõ câu hỏi

Câu 18: B

Câu 19: B

Câu 20: B

Câu 21: A

Câu 22: C

Câu 23: B

Câu 24: A

II: Bài tập:
uses crt;
var i,s,n:longint;
begin
clrscr;
write('n='); readln(n);
s:=0;
for i:=1 to n do
if i mod 3=0 then s:=s+i;
writeln('tong cac so tu nhien chia het cho 3 khong vuot qua ',n,' la: ',s);
readln;
end.

28 tháng 12 2021

a, b : integer 

if (a+b>8) 

28 tháng 12 2021

c=5-10=-5