Giáo án môn Tin học 11 - Bài thực hành số 11
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 (35.94 KB, 2 trang )
<span class='text_page_counter'>(1)</span>BAØI THỰCHAØNH SỐ 11 A. Muïc ñích,yeâu caàu Luyeän taäp vaøcuûng coá veà caáu truùc laëp Tiếp tục làm quen với các công cụ phục vụ hiệu chỉnh chương trình B. Bước Chuẩn Bị: GV:Sgk, ñóachöông trình, baøi taäp HS:Sgk,đĩa A, vở bài tập C. Noäi Dung: GV: 1) Hỏi học sinh thế nào là bài toán lặp, cho ví dụ cụ thể. 2) Có mấy câu lệnh lặp mà ta đã học? khi nào thì dùng câu lệnh lặp While – do? khi nào thì dùng câu lệnh lặp For– do? viết cú pháp từng câu lệnh? HS: Vận dụng: Hãy hoàn chỉnh các chương trình sau và đánh vào máy để kiểm tra: Baøi 1) Var : integer ; Begin For ga:=1 to 36 -------Begin Cho = 36- ga; If ga*2 + cho*4 = 100 then Writeln(‘ so ga =’, ga:3); Writeln(‘ so cho =’, cho :3); End; Readln; End. Bài 2) Chương trình tìm UCLN(A,B) với A,B là 2 số nguyên dương nhập từ bàn phím Var A,B: ------------------BEGIN WRITE(‘NHAP A ,B=’); READLN( ---------- ); WHILE --------------- DO IF A> B THEN A:=A-B ELSE ---------------WRITELN(‘UCLN=’,A); END. Baøi 3) PROGRAM TONG_S; Var S: ------------------A,N:--------------BEGIN WRITE(‘NHAP GIA TRI A =’); READLN( ---------- );. Lop11.com.
<span class='text_page_counter'>(2)</span> S:=1/A; N:=0; WHILE NOT(1/(A+N) <0.0001)-------BEGIN N:=--------------------S:= S+1/(A+N) END----WRITELN(‘TONG S=’,S:4); END. *Qua 3 chương trình trên GV sẽ khắc phục được lỗi sai thường gặp của hs và giúp các em hiệu chỉnh được kỹnăng thao tác trên máy; chạy thử chương trình với các bộ dữ liệu khác để thấy được tính dúng đắn của chương trình. D. NHẬN XÉTVAØ ĐÁNH GIÁ: Kết thúc buổi thực hành GV nhận xét và đánh giá buổi thực hành, củng cố lại kiến thức cho các em, nhắc nhở các vấn đề cần thiết khi lên máy.. Lop11.com.
<span class='text_page_counter'>(3)</span>
