Ôn tập học kì II môn Tin học Lớp 8 - Năm học 2019-2020

 A. Var a,b: array[1 .. n] of real; C. Var a,b: array[1 : n] of Integer;
 B. Var a,b: array[1 .. 100] of real; D. Var a,b: array[1  100] of real;
Câu 8: Trong lệnh lặp fordo của Pascal, trong mỗi vòng lặp, biến đếm thay đổi như thế nào?
 A. +1 B. +1 hoặc -1 C. Một giá trị bất kì D. Một giá trị khác 0
Câu 9: Cú pháp của câu lệnh Whiledo là:
 a. While to ; b. While to do ;
 c. While do ; d. While ; do ;
Câu 10: Sau khi thực hiện các câu lệnh sau, giá trị của biến S bằng bao nhiêu?
 S:=10;
 IF S < 20 then S := S + 2 else S := S - 2;
 A. 10 B. 8 C. 12 D. 20
Câu 11: Câu lệnh điều kiện dạng đủ nào sau đây là đúng?
 A. If then else ;
 B. If then else ;
 C. If then ;
 D. If do else ;
Câu 12: Sau khi thực hiện đoạn chương trình sau, giá trị của biến S bằng bao nhiêu?: 
 S:=0; For i:=1 to 5 do S:=S+i; 
 A. 20 B. 15 C. 10 D. 0
Câu 13: Pascal sử dụng câu lệnh lặp nào sau đây để lặp với số lần chưa biết trước?
 A. Fordo; B. Whiledo; C. If..then; D. Ifthenelse;
Câu 14: Khi thực hiện câu lệnh điều kiện dạng thiếu, nếu điều kiện sai thì :
 A. Câu lệnh điều kiện bị bỏ qua; B. Thực hiện ; 
 C. Thực hiện ; D. Cả ba câu đều sai;
Câu 15: Câu lệnh Readln(A[1]); có tác dụng gì?
A. Xóa màn hình 
B. In ra màn hình dòng chữ “A[1]”
C. Dừng màn hình để nhập giá trị cho phần tử thứ nhất của mảng A
D. Dừng màn hình để nhập giá trị cho phần tử thứ nhất của mảng A, sau đó xuống hàng
 Trang 2 4/ Cho biết cú pháp và hoạt động của câu lệnh lặp với số lần chưa biết trước? Cho ví dụ
Cú pháp: While do ; 
Trong đó : + Điều kiện thường là một phép so sánh
 + Câu lệnh có thể là câu lệnh đơn hoặc câu lệnh ghép
Hoạt động : 
+ Bước 1: Kiểm tra điều kiện
+ Bước 2: Nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và kết thúc câu lệnh lặp. 
 Nếu điều kiện đúng thực hiện câu lệnh và quay lại bước 1.
Ví dụ : S := 20;
 While S > 10 do S := S – 2;
5/ Cho biết cú pháp khai báo biến mảng trong Pascal? Cho ví dụ.
Cú pháp : Var Tên mảng : array [.. ] of ;
Trong đó : + Chỉ số đầu <= chỉ số cuối, là các số nguyên
 + Kiểu dữ liệu có thể là kiểu số nguyên (integer) hoặc kiểu số thực (real)
Ví dụ : Var DiemToan : array [1..35] of real;
6/ Cho biết cú pháp truy xuất vào một phần tử của biến mảng? Cho ví dụ
 Cú pháp : Tên mảng [chỉ số]
 Ví dụ : Gán giá trị 10 vào phần tử thứ nhất của mảng A : A[1] := 10;
 Trang 4 3/ Viết chương trình nhập vào số tự nhiên N 4/ Viết chương trình tìm N để Sn = 1 + 2 + 3 +  
<= 1000. In ra màn hình tổng N số tự nhiên đầu + N nhỏ nhất lớn hơn 1000. 
tiên. Program TimN;
Program TinhTong; Uses crt;
Uses crt; Var N, S : integer;
Var i, N : integer; Begin
 S : longint; Clrscr;
Begin S := 0;
 Clrscr; N := 0;
 Write(‘Nhap so N: ‘); While S <= 1000 do
 Readln(N); Begin
 For i:= 1 to N do S := S + i; N := N + 1;
 Writeln(‘Tong ‘, N, ‘so tu nhien dau tien = ‘, S); S := S + N;
 Readln End;
End. Writeln(‘So N de tong nho nhat >1000: ’, N);
 Readln
 End.
 5/ Đọc hiểu chương trình, viết chương trình theo 
 yêu cầu.
 Trang 6