1. Trang chủ
  2. » Công Nghệ Thông Tin

CÂU HỎI TRẮC NGHIỆM (P3) docx

8 409 0

Đang tải... (xem toàn văn)

THÔNG TIN TÀI LIỆU

Thông tin cơ bản

Định dạng
Số trang 8
Dung lượng 248,77 KB

Nội dung

CÂU HỎI TRẮC NGHIỆM Câu 1: Cho S và i là biến nguyên... Ðể lệnh ReadlnA được thực hiện ít nhất một lần, phải điền vào chỗ ...

Trang 1

CÂU HỎI TRẮC NGHIỆM

Câu 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 10 do s := s+i;

writeln(s);

Kết quả in lên màn hình là :

a) s = 11

b) s = 55

c) s = 100

d) s = 101

Câu 2: Cho S, i và N>0 là các biến nguyên Ðể tính S = N!, chọn câu nào :

a) S := 1; For i := 1 to N do S := S * i;

b) S := 0; For i := 1 to N do S := S * i;

Trang 2

c) S := 1; For i := 1 to N do S := S * N;

d) S := 1; For i:= 1 to N do S := S + i;

Câu 3: Cho S = 12 + 22 + + 1002 Nhóm lệnh nào tính sai Giá trị của S:

a) S:=0; FOR i:=1 TO 100 DO S := S + i*i;

b) S:=0; FOR i:=1 TO 100 DO S := S + SQR(i);

c) S:=0; FOR i:=100 DOWNTO 1 DO S := S + i*i;

d) S:=1; FOR i:=1 TO 100 DO S := S + i*i;

Câu 4-Khi chạy chương trình :

Var S, i, j : Integer;

Begin

S := 0;

for i:= 1 to 3 do

for j:= 1 to 4 do S := S + 1 ;

End

Trang 3

Giá trị sau cùng của S là :

a) 0

b) 12

c) 3

d) 4

Câu 5: Cho S và i biến kiểu nguyên Khi chạy đoạn chương trình :

S:= 0; i:= 1;

while i<= 6 do

begin

S:= S + i;

i:= i + 2;

end;

Giá trị sau cùng của S là :

a) 6

Trang 4

b) 9

c) 11

d) 0

Câu 6: Khi chạy chương trình :

Var S, i : Integer;

Begin

S:= 0; i:= 1;

Repeat

S:= S + i * i;

i:= i + 1;

Until i > 4 ;

End

Giá trị sau cùng của S là :

a) 0

Trang 5

b) 14

c) 16

d) 30

Câu 7: Cho i là biến nguyên Khi chạy đoạn chương trình :

i := 5;

Repeat

i := i + 1;

Until i > 4 ;

Giá trị sau cùng của i là :

a) 6

b) 4

c) 5

d) 0

Trang 6

Câu 8: Cho m, n, i là các biến nguyên Khi chạy đoạn chương trình :

m:=4; n:=5; i:=5;

Repeat

i:=i+1;

Until (i Mod m = 0) and (i Mod n = 0);

Giátrị sau cùng của i là :

a) 20

b) 5

c) 4

d) 0

Câu 9: Cho chương trình :

Var A : Real;

Begin

Trang 7

While A = 0 do

begin

write ('nhap A # 0:');

Readln (A);

end;

End

Ðể lệnh Readln(A) được thực hiện ít nhất một lần, phải điền vào chỗ lệnh nào trong các lệnh dưới đây ?

a) A:=0;

b) A:=1;

c) A:=-1;

d) A <> 0;

Câu 10: Giảsử các khai báo biến đều hợp lệ Ðể tính S = 10!, chọn câu nào

:

Trang 8

a) S := 1; i := 1;

while i<= 10 do S := S * i;

i := i + 1;

b) S := 1; i := 1;

while i<= 10 do i := i + 1;

S := S * i;

c) S := 0; i := 1;

while i<= 10 do

begin

S := S * i;

i := i + 1;

end;

d) S := 1; i := 1;

while i<= 10 do

begin

S := S * i;

i := i + 1;

end;

Ngày đăng: 18/06/2014, 14:20

TỪ KHÓA LIÊN QUAN

TÀI LIỆU CÙNG NGƯỜI DÙNG

TÀI LIỆU LIÊN QUAN

w