A. LÝ THUYẾT Câu 1: Trong ngôn ngữ lập trình Pascal, câu lệnh nào sau đây là đúng? A. if <điều kiện> then <câu lệnh> ; else ; C. if <điều kiện>; then <câu lệnh> else ; B. if <điều kiện> then <câu lệnh>else ; D. if <điều kiện>; then <câu lệnh> ; else ; Câu 2: Phát biểu nào sau đây có thể lấy làm biểu thức điều kiện trong cấu trúc rẽ nhánh? A. A > B B. A + B C. N mod 100 D. “A nho hon B” Câu 3: Cho a = 1, b = 1. Hãy cho biết t sẽ nhận giá trị nào khi kết thúc đoạn chương trình sau: a:= b + 1; b:= a; if a = b then t:= a + b + 1 else t:= a + b – 1; A. 1 B. 5 C. 3 D. Đoạn chương trình báo lỗi Câu 4: Trong câu lệnh if – then, sau if là <điều kiện>. Điều kiện là? A. Biểu thức logic C. Biểu thức quan hệ B. Biểu thức số học D. Một câu lệnh Câu 5: Hãy chọn phương án đúng. Với cấu trúc rẽ nhánh if <điều kiện> then , câu lệnh đứng sau then được thực hiện khi A. Điều kiện được tính toán xong B. Điều kiện được tính toán và cho giá trị đúng C. Điều kiện không tính được D. Điều kiện được tính toán và cho giá trị sai Câu 6: Câu lệnh Pascal nào sau đây là hợp lệ: A. For i:=100 to do writeln (‘A’); C. For i:= 1 to 10 do writeln (‘A’); B. For i:= 1.5 to 10.5 do writeln (‘A’); D. For i:=1 downto 10 do writeln (‘A’); Câu 7: Vòng lặp While..do là vòng lặp: A. Biết trước số vòng lặp C. Biết trước số lần lặp nhưng giới hạn là <= 100 B. Chưa biết trước số lần lặp D. Biết trước số lần lặp nhưng giới hạn là >= 100 Câu 8: Với i là kiểu dữ liệu Integer. Đoạn chương trình sau in ra kết quả nào?: For i:=1 to 5 write(i); A.iiiii B.5i C.12345 D.54321 Câu 9: 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 10: Cho S, i và N>0 là các biến nguyên. Ðể tính S = N!, chọn câu đúng : A. S := 1; For i := 1 to N do S := S * i; C. S := 1; For i := 1 to N do S := S * N; B. S := 0; For i := 1 to N do S := S * i; D. S := 1; For i:= 1 to N do S := S + i; B. BÀI TẬP Viết chương trình Pascal tính S = N! Với N > 0 được nhập từ bàn phím. In ra màn hình kết quả của S.
1 câu trả lời
A.LÝ THUYẾT:
1B 2A 3B 4C 5B 6C 7B 8D 9B 10A
B.BÀI TẬP:
uses crt;
var n,i:integer;
s:extended; {S nhận giá trị rất lớn}
BEGIN
clrscr;
write('Nhap n:'); readln(n);
s:=1;
for i:=2 to n do
s:=s*i;
write('N!=',s:0:0);
readln
END.
