* Câu lệnh lặp với số lần chưa biết trước ít nhất được thực hiện một lần ; câu lệnh lặp với số lần biết trước có thể không được thực hiện nếu ngay từ đầu điều kiện sai?. THÖÏC HAØNH:[r]
(1)TRƯỜNG THCS HƯNG ĐIỀN A
ĐỀ CƯƠNG TIN HỌC 8 Năm: 2009-2010
A Lý Thuyết
Câu : Sau thực đoạn chương trình sau, giá trị biến j bao nhiêu? Tại sao?
j:= 0;
for i := to j := j+2;
Câu 2: Hãy cho biết tác dụng câu lệnh lặp.
Câu 3: Với cấu trúc câu lệnh lặp với số lần biết trước Pascal, máy kiểm tra điều ở điều kiện?
Câu 4: Ghi cấu trúc giải thich câu lệnh lặp với số lần biết trước?
Câu : Tìm hiểu thuật tốn sau cho biết thực thuật toán, máy lặp lần? Khi kết thúc giá trị S bao nhiêu?
Thuật toán:
B1: S 10; x 0.5;
B2: Nếu S < = 5.2; chuyển tới bước 4; B3: S S – x quay lại B2;
B4: Thông báo S kết thúc.
Câu : Hãy nêu lợi ích việc sử dụng biến mãng chương trình?
Câu : Các khai báo mãng sau hay sai? Nếu sai sửa lại cho đúng a) var X : Array [10, 13] of integer;
b) var X : Array [5 10 5] of real; c) var X : Array [3.4 4.8] of integer; d) var X : Array [10 1] of integer; e) var X : Array [4 10] of real;
Câu : Nêu khác cấu trúc câu lệnh lặp với số lần chưa biết trước câu lệnh lặp với số lần biết trước?
ĐÁP ÁN: Câu 1:
* Khi i = 0; j = + = 2, tương tự với i = 1, 2, 3, 4, 5; i = 5, j = 10 +2 = 12 Câu 2:
*Giúp cơng việc lập trình đơn giả cần viết câu lệnh hay nhóm câu lệnh thay cho nhiều câu lệnh hay nhóm câu lệnh phải viết
Câu 3:
*Kiểm tra giá trị đầu có lớn giá trị cuối hay không Câu 4:
* Cấu trúc:
for <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh>;
*Giải thich:
- biến đếm biến đơn có kiểu nguyên;
(2)- giá trị đầu giá trị cuối biểu thức có kiểu với biến đếm giá trị cuối phải lớn giá trị đầu;
- câu lệnh câu lệnh đơn giản hay câu lệnh ghép
Caâu 5:
*) Lặp 10 vòng; S = *) Viết chương trình:
Program tt; uses crt; var S, x: real;
begin
clrscr;
S :=10; x := 0.5;
while S > 5.2 S := S – x;
write (‘S = ‘, S:7:2);
readln
end Câu :
* Có thể thay nhiều câu lệnh lặp xuất hình câu lệnh lặp
Sử dụng biến mãng hiệu xử lý liệu Có thể làm việc với phần tử mãng làm việc với biến thông thường
Câu :
a) Sai, mãng có dấu ',', sửa lại var X : Array [10 13] of integer; b) Sai, giá trị sau mãng khơng số ngun
c) Sai, giá trị trước giá trị sau mãng không số nguyên d) Sai, giá trị đầu lại lớn giá trị sau
e) Đúng Câu :
Ngoài khác thể qua tên gọi, chúng khác điểm sau:
* Ở điều kiện: Của câu lệnh lặp với số lần chưa biết trước, lệnh thực đến điều kiện sai ; câu lệnh lặp với số lần biết trước thực đến điểu kiện đúng
* Câu lệnh lặp với số lần chưa biết trước ít thực lần; câu lệnh lặp với số lần biết trước cĩ thể khơng thực hiện từ đầu điều kiện sai B THỰC HÀNH:
Bài 1:
Viết chương trình tính tổng n số tự nhiên đầu tiên, với n số tự nhiên nhập vào từ bàn phím?
Bài 2:
Viết chương trình in hình thứ tự lần lặp? Bài 3:
Viết chương trình nhập n số nguyên từ bàn phím In hình số nhỏ số lớn N nhập từ bàn phím?
Baøi 4:
(3)B1: S 10; x 0.5;
B2: Nếu S < = 5.2; chuyển tới bước 4; B3: S S – x quay lại B2;
B4: Thông báo S kết thúc. Bài 5:
Dùng phần mềm Yenka, vẽ mô hình không gian theo mẫu sau:
ĐÁP ÁN: Bài 1:
Program tinh_tong; Uses crt;
Var
i, n: integer; tong: longint; Begin
Clrscr; Tong:=0;
Writeln(‘Nhap vao so n’); readln(n); For i:=1 to n
Tong: = Tong+i;
Writeln(‘Tong cua’, n,’so tu nhien dautien la’,tong); Readln;
End
Baøi 2: Program lap; Var i: integer; Begin
For i:=1 to 10
(4)Baøi 3:
program MaxMin;
uses crt;
Var
i, n, Max, Min: integer; A: array[1 100] of integer;
Begin
clrscr;
write('Hay nhap dai cua day so, N = '); readln(n); writeln('Nhap cac phan tu cua day so:');
For i:=1 to n do
Begin
write('a[',i,']='); readln(a[i]); End;
Max:=a[1]; Min:=a[1]; for i:=2 to n do
beginif Max<a[i] then Max:=a[i]; if Min>a[i] then Min:=a[i] end;
write('So lon nhat la Max = ',Max); write('; So nho nhat la Min = ',Min); readln
End
Baøi 4:
Program tt; uses crt; var S, x: real;
begin
clrscr;
S :=10; x := 0.5;
while S > 5.2 S := S – x;
write (‘S = ‘, S:7:2);
readln