Giáo án môn Tin học lớp 11 bài 28

Hoạt động của thầy và trò

Nội dung

Hoạt động 1: Hướng dẫn HS thực hành (15p)

B1: chuyển giao nhiệm vụ học tập.

GV nêu yêu cầu của bài toán.

Chia lớp theo nhóm thảo luận.

GV: Giới thiệu nội dung thực hành:

HS: Quan sát nội dung thực hành

GV: Lấy một ví dụ thực tiễn: Người mù tìm viên sỏi có kích thước lớn nhất trong một dãy các viên sỏi để gợi ý cho học sinh thuật toán tìm giá trị lớn nhất.

GV: Nêu thuật toán tìm phần tử có giá trị lớn nhất.

B2: Thực hiện nhiệm vụ học tập

HS thảo luận nhóm.

GV quan sát giúp đỡ HS gặp khó khăn.

HS: So sánh lần lượt từ trái sang phải, giữ lại chỉ số của phần tử lớn nhất.

GV: Yêu cầu học sinh tìm hiểu chương trình tìm chỉ số và giá trị lớn nhất.

- Chiếu chương trình ví dụ, sách giáo khoa trang 64.

- Hỏi: Vai trò của biến j trong chương trình?

HS: Giữ lại chỉ số của phần tử có giá trị lớn nhất.

GV: Nếu muốn tìm phần tử lớn nhất với chỉ số nhỏ nhất ta sửa ở chỗ nào?

B3: Báo cáo kết quả thảo luận.

Các nhóm báo cáo kết quả thảo luận.

HS: Duyệt chương trình từ n-1 đến 1. GV: Đặt yêu cầu mới: Viết chương trình đưa ra các chỉ số của các phần tử có giá trị lớn nhất.

HS: Theo dõi yêu cầu, suy nghĩ các câu hỏi định hướng để viết chương trình.

GV: Cần giữ lại đoạn chương trình tìm giá trị lớn nhất không?

HS: Có.

GV: Cần thêm lệnh nào nữa?

HS: Lệnh để in ra các chỉ số có giá trị bằng giá trị lớn nhất tìm được.

GV: Vị trí thêm các lệnh đó?

Sau khi tìm được giá trị lớn nhất.

B4: Đánh giá kết quả thực hiện nhiệm vụ học tập

GV nhận xét kết quả thực hiện nhiệm vụ của các nhóm và chính xác hóa kiến thức.

Hoạt động 2: Học sinh thực hành (25p)

GV: Yêu cầu Viết chương trình hoàn thiện.

- Yêu cầu học sinh nhập dữ liệu vào của giáo viên và báo kết quả.

- Đánh giá kết quả của học sinh.

- Soạn chương trìnhvào máy. Thực hiện chương trình và thông báo kết quả.

- Nhập dữ liệu vào và thông báo cho giáo viên dữ liệu ra.

Bài 2: Viết chương trình tìm phần tử có giá trị lớn nhất của mảng và in ra màn hình chỉ số và giá trị của phần tử tìm được. Nếu có nhiều phần tử có cùng giá trị lớn nhất thì chỉ đưa ra phần tử có chỉ số nhỏ nhất

Chương trình như sau:

Program timmax;

Uses crt;

Var A: array[1..250] of integer;

n,i,max,csmax: Integer;

Begin

clrscr;

Write('Nhap n = ');

Readln(n);

For i:= 1 to n do

Begin

Write('a[',i,'] = ');

readln(a[i]);

End;

max:= a[N];

csmax:= 1;

For i:= n-1 downto 1 do

If a[i] > max then

Begin

max:= a[i];

csmax:=i;

End;

Writeln('Gia tri lon nhat: ',max);

Writeln('chi so ptu lon nhat: ',csmax);

Readln;

End.