Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (256.96 KB, 4 trang )
<span class='text_page_counter'>(1)</span><div class='page_container' data-page=1>
ỦY BAN NHÂN DÂN QUẬN 11
<b>TRƯỜNG THCS NGUYỄN VĂN PHÚ </b>
<b>NỘI DUNG TRỌNG TÂM TUẦN 09/HK2 </b>
<b>MÔN: TIN HỌC 8 </b>
<b>Trong thời gian học sinh được nghỉ do dịch bệnh Covid – 19 </b>
TIẾT 53 (THEO PPCT)
<b>BÀI TẬP </b>
1. Nội dung:
<b>Bài 1:Viết chương trình Pascal giải bài tốn sau </b>
Thuyền to chở được mười người
Thuyền con chỉ chở sáu người là đơng
Một bầy con nít qua sông
Mười thuyền to, nhỏ giữa dịng đang trơi
Cả bầy là tám mươi người
Trên bờ cịn có bốn người chờ sang
Bao thuyền to, nhỏ sang ngang?
Program Tinh_so_thuyen;
Uses crt;
Var thuyento, thuyennho: integer;
Begin
Clrscr;
Thuyento:= 1; thuyennho:= 1;
While (thuyento*10 + thuyennho*6) < 84 do
Begin
thuyento:= thuyento + 1;
thuyennho:= 10 – thuyento;
end;
writeln(‘So thuyen to la:’ , thuyento);
writeln(‘So thuyen nho la:’ , thuyennho);
Readln
<b>Bài 2: Viết chương trình Pascal giải bài tốn sau </b>
Trăm trâu ăn trăm bó cỏ
Trâu đứng ăn năm
Trâu nằm ăn ba
Lụ khụ trâu già
Ba con một bó
Mấy trâu đứng, mấy trâu nằm và mấy trâu già?
Program Tinh_So_trau;
Uses crt;
Var td, tn, tg : integer;
Begin
Clrscr;
For td:= 1 to 100 do
for tn:= 1 to 100 do
begin
tg:= 100 - td – tn;
if (td*5 + tn*3 + tg/3 = 100) then
writeln(‘ Trau dung: ’, td, ‘; Trau nam: ’, tn, ‘;Trau gia:’, tg);
end;
Readln;
End.
2. Câu hỏi luyện tập:
TIẾT 54 (THEO PPCT)
<b>KIỂM TRA 1 TIẾT LÝ THUYẾT </b>
<b>1.Nội dung: </b>
<b>Ôn tập những kiến thức đã học chuẩn bị cho bài kiểm tra 1 tiết lý thuyết. </b>
<b>1.Nêu cú pháp và hoạt động của câu lệnh lặp với số lần biết trước? </b>
Cú pháp câu lệnh lặp với số lần biết trước:
<b>For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>; </b>
<b>Hoạt động: </b>
- Câu lệnh lặp sẽ thực hiện câu lệnh nhiều lần, mỗi lần là một vòng lặp.
- Số vòng lặp là biết trước và bằng giá trị cuối – giá trị đầu + 1
- Khi thực hiện, ban đầu biến đếm sẽ bằng giá trị đầu, sau mỗi vòng lặp,
biến đếm tự động tăng thêm một đơn vị cho đến khi bằng giá trị cuối.
<b>2.Nêu 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? </b>
Cú pháp câu lệnh lặp với số lần biết trước:
<b>While <điều kiện> do <câu lệnh>; </b>
<b>Hoạt động: </b>
- B1. Kiểm tra điều kiện.
- B2. 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 B1.
<b>3.Nêu ý nghĩa các câu lệnh GotoXY(a,b), WhereX, WhereY? </b>
- GotoXY(a,b): đưa con trỏ về cột a, hàng b.
- WhereX : cho biết số thứ tự của cột đang có con trỏ.
- WhereY: cho biết số thứ tự của hàng đang có con trỏ.
<b>4.Em hãy cho biết các giá trị của P trong mỗi vòng lặp của câu lệnh sau: </b>
P:= 1;
for i:= 1 to 4 do P:= P*i;
<b>Trả lời: </b>
Vòng lặp 3: P= 6
Vịng lặp 4: P= 24
<b>5.Lệnh mở cửa sổ khơng gian 3D? </b>
Hiển thị Hiển thị dạng 3D
<b>6. Các công cụ di chuyển và công cụ tạo điểm trong phần phần mềm </b>
<b>Geogebra? </b>
: công cụ di chuyển
: công cụ tạo điểm
2.Câu hỏi luyện tập: