Tiet53_luyen tap

Chia sẻ bởi Vũ Thị Ánh Duyên | Ngày 02/05/2019 | 52

Chia sẻ tài liệu: tiet53_luyen tap thuộc Tin học 6

Nội dung tài liệu:

A. LÝ THUYẾT
1. Câu lệnh điều kiện trong Pascal:
-Câu lệnh điều kiện dạng thiếu :
if <điều kiện> then ;
-Câu lệnh điều kiện dạng đủ :
if <điều kiện> then else ;
2. Câu lệnh lặp với số lần biết trước for ... do :
for := to do ;
3. Câu lệnh lặp với số lần chưa biết trước While … do:
while <điều kiện> do ;
Câu lệnh điều kiện trong Pascal có mấy dạng? Nêu cú pháp của từng dạng?
Nêu cú pháp câu lệnh lặp với số lần biết trước trong Pascal?
Nêu cú pháp câu lệnh lặp với số lần chưa biết trước trong Pascal?
B. BÀI TẬP
Câu 1: Cho S và i là biến nguyên. Khi chạy đoạn chương trình :
s:=1; for i:=1 to 4 do s := s+i; writeln(s); Kết quả in lên màn hình là của s là:
A. 55 B. 10 C. 15 D. 11
Câu 2: Các hoạt động nào dưới đây lặp với số lần xác định?
A. Ngày đánh răng 3 lần.
B. Nhặt rau cho đến hết.
C. Gọi điện cho đến khi có người nhấc máy
D. Học cho đến khi thuộc bài.
Câu 3: Câu lệnh lặp với số lần biết trước có dạng:
A. While <điều kiện 1> do ;
B. For := to do ;
C. While do <điều kiện>;
D. While <điều kiện> do ;
Câu 4: Với ngôn ngữ lập trình Passcal câu lệnh lặp:
for i:=1 to 10 do x:=x+1; thì biến đếm i phải được khai báo là kiểu dữ liệu.
A. Integer; B. Tất cả các kiểu trên đều được. C. String D. Real;
Bài 1: Khoanh tròn chữ cái đứng trước câu trả lời đúng:
B. BÀI TẬP
Câu 5: Trong câu lệnh lặp for i:=1 to 12 do Write(‘A’); thì lệnh Write(‘A’) được thực hiện bao nhiêu lần?
A. Không lần nào B. 1 lần C. 2 lần. D. 12 lần
Câu 6: Lệnh lặp nào sau đây là đúng?
A. For := to do ;
B. For : to do ;
C. While <điều kiện> do ;
D. While do <điều kiện>;
Câu 7: Để tính tổng S=1 + 2 +3 +4 … + n; em chọn đoạn lệnh:
A. for i:=1 to n do if ( i mod 2)<>0 then S:=S + i;
B. for i:=1 to n do if ( i mod 2)=0 then S:=S + i;
C. for i:=1 to n do S:= S + i ;
D. for i:=1 to n do if ( i mod 2)=1 then S:=S + i;
Câu 8: Sau khi thực hiện đoạn chương trình j:= 0; for i:= 1 to 3 do j:=j+3; Thì giá trị j in ra màn hình là?
A. 9 B. 10 C. 8 D. 12

Bài 1: Khoanh tròn chữ cái đứng trước câu trả lời đúng:
B. BÀI TẬP
Câu 9: Vòng lặp While <Điều kiện> do ; là vòng lặp:
A. Biết trước số lần lặp
B. Chưa biết trước số lần lặp
C. Biết trước số lần lặp nhưng giới hạn là >=100
D. Biết trước số lần lặp nhưng giới hạn là <=100
Câu 10: Hãy cho biết đâu là đoạn lệnh lặp for ... do để tính tổng S = 1 + 1/2 + 1/3 + ...+ 1/10?
A. S:=0; For i:=1 to 10 do S:=i + 1/i;
B. S:=0; For i:=1 to 10 do S:=S + 1/i;
C. S:=0; For i:=1 to 10 do Begin S:=S + 1/i; i:= i + 1; End;
D. S:=0; For i:=1 to 10 do S:=S + i;
Bài 1: Khoanh tròn chữ cái đứng trước câu trả lời đúng:
B. BÀI TẬP
Bài 1: Khoanh tròn chữ cái đứng trước câu trả lời đúng:
Bài 2: Viết chương trình xuất ra màn hình các số nguyên tố nhỏ hơn 100?
Từ thuật toán đến chương trình:
for n:= 2 to 100 do
begin
i:=2;
while (n mod i<>0) do i:=i+1;
if i=n then write(n:5);
end;
Thuật toán kiểm tra số nguyên tố:
B1. i2;
B2. Trong khi N mod i <> 0, ii+1;
B3. Nếu i = N thì thông báo N là số nguyên tố,
Đề bài yêu cầu các em làm gì?
Xuất ra màn hình các số nguyên tố nhỏ hơn 100.
Số lượng các số cần kiểm tra có biết trước hay không?
Số lượng các số cần kiểm tra là 99
Dùng vòng lặp nào để viết chương trình?
Vòng lặp for .. do
B. BÀI TẬP
Bài 1: Khoanh tròn chữ cái đứng trước câu trả lời đúng:
Bài 2: Viết chương trình xuất ra màn hình các số nguyên tố nhỏ hơn 100?
Uses Crt;
Var n,i: integer;
Begin
Clrscr;
writeln(‘Cac so nguyen to nho hon 100 la: `);
for n:= 2 to 100 do
begin
i:=2;
while (n mod i<>0) do i:=i+1;
if i=n then write(n:5);
end;
writeln;
writeln(‘Nhan Enter de thoat …!’);
readln
end.
HƯỚNG DẪN VỀ NHÀ:
Học thuộc các cú pháp câu lệnh đã học
Xem lại các bài tập đã làm
Ôn tập tiết sau kiểm tra 1 tiế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ẻ: Vũ Thị Ánh Duyên
Dung lượng: | Lượt tài: 0
Loại file:
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)