Tranduong
Chia sẻ bởi La Chí Thanh |
Ngày 14/10/2018 |
46
Chia sẻ tài liệu: tranduong thuộc Tin học 8
Nội dung tài liệu:
ĐỀ CƯƠNG ÔN THI HKII
MÔN: TIN HỌC 8
Năm học: 2010 - 2011
-------0O0-------
Câu 1: Trong ngôn ngữ lập trình (pascal) câu lệnh lặp có dạng như thế nào? Ví dụ 5/trang 59 sgk:
=> for:= to do ;
*Ví dụ 5:
Program Tinh_tong;
Var N, i: integer;
S: longint;
Begin
write(‘Nhap so N = ‘); readln (N);
S:=0;
for i:= 1 to N do S:= S + i;
writeln(‘Tong cua ‘,N,’ so tu nhien dau tien S = ‘,S);
readln;
End.
Câu 2: Trong ngôn ngữ lập trình (pascal) câu lệnh lặp với số lần chưa biết trước có dạng như thế nào? Cách thực hiện? Bài tập 3, 4, 5/ trang 71.
=> while <điều kiện> do;
- Cách thực hiện:
1. Kiểm tra diều kiện.
2. Nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và việc thực hiện lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại bước 1.
*Bài tập 3/71: Hãy tìm hiểu các thuật taons sau đây và cho biết khi thục hiện thuật toán máy tính se thực hiện bao nhiêu vòng lặp? Khi kết thúc, giá trị của S bằng bao nhiêu? Viết chương trình pascal thể hiện các thuật toán đó.
a. Thuật toán 1:
- 9 vòng lặp
- S = 5
+ Chương trình:
Var S: integer;
x: real;
Begin
S:=10; x:=0,5;
while S>5,2 do
Begin S:= S – x; write (‘S’) end;
End.
b. Thuật toán 2:
- 0 vòng lặp
- S = 7; n = 3
+ Chương trình:
Var S, n: integer;
Begin
S:=10; n:= 0;
while S < 10 do
Begin n:= n + 3; S:= S – n; write (‘S’) end;
End.
*Bài tập 4/71: Hãy tìm hiểu mỗi đoạn lệnh sau đây và cho biết với đoạn lệnh đó chương trình thực hiện bao nhiêu vòng lặp? Hãy rút ra nhận xét của em.
a. – Thực hiện 5 vòng lặp
b. – Vòng lặp không bao giờ kết thúc.
*Nhận xét:
- Do sau từ do thiếu begin….end nên máy thực hiện câu lệnh n:= n + 1, không thực hiện lệnh S:= S + n cho nên S=0 và chương trình rơi vào vòng lặp vô hạn.
Bài 5/71: Hãy chỉ ra lỗi trong các câu lệnh sau đây:
X:= 10; while X:= 10 do X:= X + 5;
=> X:= 10; while X = 10 do X:= X + 5
X:= 10; while X = 10 do X = X + 5;
=> X:= 10; while X = 10 do X := X + 5;
S:= 0; n:= 0; while S <= 10 do n:= n + 1; S:= S + n;
=> S:= 0; n:= 0; while S <= 10 do begin n:= n + 1; S:= S + n end;
*Bài 5/79: Viết chương trình pascal sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số. Độ dài của dãy cũng được nhập từ bàn phím.
- Chương trình:
uses crt;
var i, n: integer;
A:array[1..100] of integer;
Begin
clrscr;
write(‘Hay nhap do dai cac day so, N=’);
readln(n);
writeln(‘Nhap cac phan tu cac day so :’);
for i:= 1 to n do
Begin
write(‘a[‘,i,’]=’); readln (a[i]);
end;
End.
--------------------- HẾT ---------------------
MÔN: TIN HỌC 8
Năm học: 2010 - 2011
-------0O0-------
Câu 1: Trong ngôn ngữ lập trình (pascal) câu lệnh lặp có dạng như thế nào? Ví dụ 5/trang 59 sgk:
=> for
*Ví dụ 5:
Program Tinh_tong;
Var N, i: integer;
S: longint;
Begin
write(‘Nhap so N = ‘); readln (N);
S:=0;
for i:= 1 to N do S:= S + i;
writeln(‘Tong cua ‘,N,’ so tu nhien dau tien S = ‘,S);
readln;
End.
Câu 2: Trong ngôn ngữ lập trình (pascal) câu lệnh lặp với số lần chưa biết trước có dạng như thế nào? Cách thực hiện? Bài tập 3, 4, 5/ trang 71.
=> while <điều kiện> do
- Cách thực hiện:
1. Kiểm tra diều kiện.
2. Nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và việc thực hiện lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại bước 1.
*Bài tập 3/71: Hãy tìm hiểu các thuật taons sau đây và cho biết khi thục hiện thuật toán máy tính se thực hiện bao nhiêu vòng lặp? Khi kết thúc, giá trị của S bằng bao nhiêu? Viết chương trình pascal thể hiện các thuật toán đó.
a. Thuật toán 1:
- 9 vòng lặp
- S = 5
+ Chương trình:
Var S: integer;
x: real;
Begin
S:=10; x:=0,5;
while S>5,2 do
Begin S:= S – x; write (‘S’) end;
End.
b. Thuật toán 2:
- 0 vòng lặp
- S = 7; n = 3
+ Chương trình:
Var S, n: integer;
Begin
S:=10; n:= 0;
while S < 10 do
Begin n:= n + 3; S:= S – n; write (‘S’) end;
End.
*Bài tập 4/71: Hãy tìm hiểu mỗi đoạn lệnh sau đây và cho biết với đoạn lệnh đó chương trình thực hiện bao nhiêu vòng lặp? Hãy rút ra nhận xét của em.
a. – Thực hiện 5 vòng lặp
b. – Vòng lặp không bao giờ kết thúc.
*Nhận xét:
- Do sau từ do thiếu begin….end nên máy thực hiện câu lệnh n:= n + 1, không thực hiện lệnh S:= S + n cho nên S=0 và chương trình rơi vào vòng lặp vô hạn.
Bài 5/71: Hãy chỉ ra lỗi trong các câu lệnh sau đây:
X:= 10; while X:= 10 do X:= X + 5;
=> X:= 10; while X = 10 do X:= X + 5
X:= 10; while X = 10 do X = X + 5;
=> X:= 10; while X = 10 do X := X + 5;
S:= 0; n:= 0; while S <= 10 do n:= n + 1; S:= S + n;
=> S:= 0; n:= 0; while S <= 10 do begin n:= n + 1; S:= S + n end;
*Bài 5/79: Viết chương trình pascal sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số. Độ dài của dãy cũng được nhập từ bàn phím.
- Chương trình:
uses crt;
var i, n: integer;
A:array[1..100] of integer;
Begin
clrscr;
write(‘Hay nhap do dai cac day so, N=’);
readln(n);
writeln(‘Nhap cac phan tu cac day so :’);
for i:= 1 to n do
Begin
write(‘a[‘,i,’]=’); readln (a[i]);
end;
End.
--------------------- HẾT ---------------------
* Một số tài liệu cũ có thể bị lỗi font khi hiển thị do dùng bộ mã không phải Unikey ...
Người chia sẻ: La Chí Thanh
Dung lượng: 47,50KB|
Lượt tài: 1
Loại file: doc
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)