Font size
WorksheetsÔn Tập KTCK2 Tin 8 22-23
Total questions: 33
Worksheet time: 32mins
Để nhập giá trị từ bàn phím cho mảng A gồm 30 phần tử, ta thực hiện lệnh nào sau đây?
For i:=1 to 30 do readln (A[i]);
For i:=1 to 30 do readln (A[30]);
For i:=30 to 1 do readln (A[i]);
For i:=1 to 52 do readln (A[52]);
Cho mảng M được khai báo như sau:
Var M : array[1..50] of integer;
Để tham chiếu tới phần tử thứ 8 của mảng M, cách viết đúng là
M(8).
M{8}.
M[1..8].
M[8]
Cho biết đoạn chương trình dưới đây thực hiện việc gì với M là mảng số nguyên gồm 10 phần tử :
S := 0 ;
For i := 1 to 10 do S := S + M[i] ;
Đếm số phần tử của mảng M
Tính tổng các số từ 1 đến 10.
Tính tổng các phần tử của mảng M
Đây là câu lệnh sai
Sau khi thực hiện đoạn chương trình dưới đây, từ “Hello” sẽ được in ra màn hình mấy lần?
n := 0 ;
While n < 0 do begin n := n + 1; Writeln (‘Hello’); end;
1
2
Không lần nào
Câu lệnh sai
Câu lệnh sau thực hiện việc gì với M là biến Mảng gồm N số nguyên:
For i := 1 to N do Write ( M[i] : 10 );
Chia giá trị các phần tử của mảng M cho 10
Đếm số phần tử của mảng M
In ra các phần tử của mảng M
Câu lệnh sai.
Bạn An viết chương trình để nhập điểm kiểm tra học kì II môn Tin cho lớp, cách khai báo biến Mảng để nhập điểm hợp lí nhất có thể viết là:
var diemtin : array[1..80] of real;
var diemtin : array[1..80] of integer;
var diemtin : array[1..80] of char;
var diemtin : array[1..80] of string;
Trong Pascal, câu lệnh nào sau đây được viết đúng?
For i:= 10 to 1 do writeln(‘A’);
For i= 1 to 10 writeln(‘A’);
For i:= 1 to 10 do writeln(‘A’);
For i to 10 do writeln(‘A’);
Trong câu lệnh lặp:
j:=0; For i := 1 to 10 do j:= j + 2;
Khi kết thúc câu lệnh lặp trên, câu lệnh j:=j+2 được thực hiện bao nhiêu lần?
10 lần
5 lần
2 lần
Không thực hiện
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?
12
22
15
42
Trong Pascal, câu lệnh nào sau đây là đúng?
S:=1;While S<10 do write(S);
n:=2; While n<5 do write(‘A’);
S:=10; While S>9 do write(S);
i:=0; S:=1;
While s<10 do begin S:=S+i; i:=i+1 end;
Khai báo biến mảng: A : array[1..20] of real;
Sử dụng câu lệnh For i:= 1 to 15 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?
1
15
6
7
Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây sai?
Chỉ số đầu nhỏ hơn chỉ số cuối.
Kiểu dữ liệu có thể là integer hoặc real.
Chỉ số đầu và chỉ cuối là 2 số nguyên
Chỉ số đầu và chỉ số cuối là 2 số thực
Khi nào thì câu lệnh lặp For…do kết thúc?
Khi biến đếm nhỏ hơn giá trị cuối
Khi biến đếm bằng giá trị cuối
Khi biến đếm bằng giá trị đầu
Khi biến đếm lớn hơn giá trị cuối
Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1; 4; 7; 2; 6.
Khi thực hiện câu lệnh sau: tong:= 0; For i:= 1 to 5 do tong := tong + A[i];
Giá trị của biến tong là bao nhiêu?
4
18
20
22
Khi sử dụng lệnh lặp While…do cần chú ý điều gì?
Số lần lặp
Số lượng câu lệnh
Điều kiện dần đi đến đúng
Điều kiện dần đi đến sai.
Trong Pascal, câu lệnh lặp với số lần chưa xác định trước có dạng:
While <điều kiện>; do <câu lệnh>;
While <điều kiện> then <câu lệnh>;
While <điều kiện>; then <câu lệnh>;
While <điều kiện> do <câu lệnh>;
Việc đầu tiên mà câu lệnh lặp While…do cần thực hiện là gì?
Thực hiện <câu lệnh> sau từ khóa do
Thực hiện <câu lệnh> sau từ khóa then
Kiểm tra <câu lệnh>
Kiểm tra giá trị của <điều kiện>
Câu lệnh khai báo biến E thuộc kiểu dữ liệu là số thực?
var E : integer;
var E : char;
var E : real;
var E : string;
Câu lệnh const u = 10; có ý nghĩa gì?
Khai báo hằng u có kiểu số nguyên
Khai báo biến u có giá trị 10.
Khai báo biến u có kiểu số nguyên.
Khai báo hằng u có giá trị 10.
Hãy chỉ ra câu lệnh lặp với số lần lặp biết trước trong các câu lệnh rút gọn sau đây?
While <điều kiện> do <câu lệnh>;
If <điều kiện> then <câu lệnh>;
If <điều kiện> then <câu lệnh 1> else <câu lệnh 2>;
For <điều kiện> do <câu lệnh>;
Cho biết kết quả của đoạn chương trình sau:
n:= 1; T:= 50;
While n>20 do
begin
n:=n+5;
T:=T - n
end;
Hãy cho biết giá trị của biến T bằng bao nhiêu?
14
17
16
50
Trong ngôn ngữ lập trình pascal, đoạn chương trình sau cho kết quả trên màn hình là gì với i là biến số nguyên?
For i:= 1 to 100 do
if I mod 9 = 0 then write(i:3);
1 2 3 4 5 6 …100
9 18 27 36 45 54 63 72 81 90 99
47592264388540504
9 9 9 9 9 9 9 9
Cho biết giá trị của biến kiểu số nguyên K sau khi thực hiện đoạn chương trình sau
K := 15;
If K div 3 > 4 then K := K + 2 Else K := K – 2 ;
K = 4
K = 12
K = 14
K = 17
Cho biết giá trị của biến Y sau khi thực hiện đoạn chương trình sau :
Y := 2;
If Y mod 3 = 0 then Y := Y + 3
ELSE Y := Y – 3 ;
0
1
2
-1
Giá trị của các phần tử mảng a từ chỉ số 1 đến 10 lượt là: 8; 9; 6; 0; 2; 4; 1; 5; 7; 3 và đoạn chương trình:
Max:=a[1];
For i:=2 to 10 do
If Max<a[i] then Max:=a[i];
Cho biết kết quả của biến Max sau khi chạy chương trình chương trình?
0
8
9
Số khác
Cho biết kết quả sau khi thực hiện đoạn chương trình sau:
For i := 1 to 10 do
If M[i] mod 2 = 0 then Write ( M[i] : 3 ) ;
0 2 28
-30 0 2 28 6
2 4 6 8 10
3 -30 -9 0 3 -9 6
Cho biết kết quả sau khi thực hiện đoạn chương trình sau:
For i := 1 to 10 do
If M[i] mod 2 = 1 then Write ( M[i] : 4 ) ;
3 28 3 -9
1 3 5 7 9
28
3 -9 1 3 -9
Em hãy viết cú pháp câu lệnh lặp với số lần chưa biết trước. Nêu hoạt động của câu lệnh?
Hãy sửa lại câu lệnh sau:
for i:=4 to 1 do writeln('A');
Hãy sửa lại câu lệnh sau:
for i= 1 to 10 writeln(‘A’);
Hãy sửa lại câu lệnh sau:
for i:20 do 1 to writeln(‘A’);
Hãy sửa lại câu lệnh sau:
for i 200 do 1 writeln(‘A’);
Viết chương trinh nhập điểm kiểm tra học kỳ môn tin học cho N học sinh và in kết quả ra màn hình.
Với N và điểm kiểm tra của từng học sinh được nhập từ bàn phím ( sử dụng biến mảng).
