RÚT KINH NGHIỆM

D CỦNG CỐ ẶN ề (5’)

E RÚT KINH NGHIỆM

HS: Đọc hiểu vớ dụ

GV: Hướng dẫn học sinh cỏch sử dụng biến mảng

HS: Chỳ ý

- Ghi vở và thực hiện chương trỡnh.

Begin

clrscr;

write('Hay nhap do dai cua day so, N = '); readln(n);

writeln('Nhap cac phan tu cua day so:'); For i:=1 to n do Begin write('a[',i,']='); readln(a[i]); End; Max:=a[1]; Min:=a[1]; for i:=2 to n do

begin if Max<a[i] then

Max:=a[i];

if Min>a[i] then

Min:=a[i] end;

write('So lon nhat la Max = ',Max); write('; So nho nhat la Min = ',Min);

readln

End.

một phần tử trong biến mảng thụng qua chỉ số tương ứng của phần tử đú. Chẳng hạn, trong cõu lệnh trờn Diem[i] là phần tử thứ i của biến mảng Diem.

Ta cú thể gỏn giỏ trị cho cỏc phần tử của mảng bằng cõu lệnh gỏn:

A[1]:=5;A[2]:=8; A[2]:=8;

hoặc nhập dữ liệu từ bàn phớm bằng cõu lệnh lặp:

for i := 1 to 5 do readln(a[i]);

3. Tỡm giỏ trị lớn nhất và nhỏ nhấtcủa dĩy số (15')

của dĩy số (15')

Vớ dụ 3. (SGK) Phần khai bỏo của chương trỡnh cụ thể như sau:

program MaxMin;

uses crt;

Var

i, n, Max, Min: integer; A: array[1..100] of integer; A: array[1..100] of integer;

D - CỦNG CỐ - DẶN Dề (5’)

- Khỏi niệm mảng một chiều

- Cỏch khai bỏo mảng, nhập, in, truy cập cỏc phần tử của mảng. - Thuật toỏn tỡm số lớn nhất và nhỏ nhất trong mảng.

- Về nhà xem lại bài học tiết sau chỳng thực hành.

E - RÚT KINH NGHIỆM.. . . . . . . . . . . . = *=*=*=<<truongdm>>=*=*=*=

Bài tập

1. Số tiết: 01 2. Ngày soạn: 1/1/2010

3. Ngày giảng:………...|………|………..|………..|

B – MỤC ĐÍCH YấU CẦU

1. Kiến thức

- Viết chương trỡnh Pascal sử dụng cõu lệnh lặp với số lần biết trước.

- Rốn luyện khả năng đọc chương trỡnh, tỡm hiểu tỏc dụng và kết hợp cỏc cõu lệnh.

3. Thỏi độ: Nghiờm tỳc

C- CHUẨN BỊ

1. Giỏo viờn: giỏo ỏn, mỏy chiếu