Các phần tử còn lại có giá trị bất kì được nhập từ bàn phím.. 1.Dãy số và biến mảng2.Ví dụ về biến mảng 3.Tìm giá trị lớn nhất và nhỏ nhất của dãy số Viết chương trình nhập N số nguyên t
Trang 1Trân Trọng kính chào Quý Thầy Cô và các
em học sinh cùng tham dự tiết học
Trang 2Em hãy nêu cách khai báo biến mảng trong
Pascal? Hãy chỉ rõ từng yếu tố trong câu lệnh?
Tên mảng: array [<chỉ số đầu> <chỉ số cuối>] of
<kiểu dữ liệu>;
Trong đó:
-Tên mảng do người dùng đặt.
-Array, of là từ khóa của chương trình.
-Chỉ số đầu phải <= chỉ số cuối.
-Kiểu dữ liệu có thể là số nguyên hoặc số thực.
Trang 31.Dãy số và biến mảng
2.Ví dụ về biến mảng
a Cách khai báo biến mảng.
- Em hãy khai báo mảng diemtin gồm 40 phần
tử thuộc kiểu dữ liệu số thực?
- Em hãy khai báo mảng mubaohiem gồm 200 phần tử?
Var diemtin: array[1 40] of real;
Var mubaohiem: array[1 200] of integer;
b Ví dụ khai báo biến mảng
Trang 41.Dãy số và biến mảng
2.Ví dụ về biến mảng
c Làm việc với các phần tử của mảng.
Ví dụ:
- Em hãy khai báo mảng diemtin gồm 10 phần tử
Nhập liệu cho diemtin biết phần tử đầu tiên và
cuối cùng luôn mang giá trị bằng 5 Các phần tử còn lại có giá trị bất kì được nhập từ bàn phím.
a Cách khai báo biến mảng.
b Ví dụ khai báo biến mảng
Trang 5Program vidu;
Var diemtin: array [1 10] of
real;
Begin
Diemtin[1]:=5;
Diemtin[10]:=5;
for i:=2 to 9 do write(‘diem =‘);
readln(diemtin[i]);
For i:=1 to 10 do write(diemtin[i]);
Readln End.
Khai báo biến
Sử dụng lệnh gán để gán giá trị
5 cho phần tử đầu và cuối.
Sử dụng lệnh lặp for to do để nhập dữ liệu cho các phần tử
còn lại (2->9).
Xuất nội dung của mảng ra màn hình sau khi nhập dữ liệu.
Trang 61.Dãy số và biến mảng
2.Ví dụ về biến mảng
3.Tìm giá trị lớn nhất và nhỏ nhất của dãy số
Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất
và số nhỏ nhất N cũng được nhập từ bàn
phím.
Trang 71.Dãy số và biến mảng
2.Ví dụ về biến mảng
3.Tìm giá trị lớn nhất và nhỏ nhất của dãy số
Trước hết ta khai báo biến N để nhập các số nguyên sẽ được nhập vào Sau đó khai báo N biến lưu các số được nhập vào như là phần tử của một biến mảng A
Trang 81.Dãy số và biến mảng
2.Ví dụ về biến mảng
3.Tìm giá trị lớn nhất và nhỏ nhất của dãy số
Em hãy nêu thuật toán để tìm số nhỏ nhất
và số lớn nhất trong dãy số?
Trang 9Viết chương trình nhập N số nguyên từ bàn phím
và in ra màn hình số lớn nhất và số nhỏ nhất N cũng được nhập từ bàn phím.
THUẬT TOÁN
• B1: max:=a 1 ; min:=a 1 ; i:=1;
• B2: i:= i+1;
• B3: Nếu i > n, chuyển đến bước 5.
• B4: Nếu a i > max thì max:=a i ; a i < min thì
min :=a i Quay lai bước 2.
• B5: Kết thúc thuật toán.
3.Tìm giá trị lớn nhất và nhỏ nhất của dãy số
Trang 10Quan sát chương trình
Var i,n,max,min:Integer;
A : Array [1 100] of Integer;
BEGIN
Write(‘ Hay nhap do dai cua day so, N= ‘);Readln(n); Writeln(‘Hay 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 ; Writeln (‘So lon nhat la Max =‘,max);
Writeln(‘So nho nhat la Min =‘,min);
Readln;
Phần khai báo
{Phần thân chương trình}
Trang 111.Dãy số và biến mảng
2.Ví dụ về biến mảng
3.Tìm giá trị lớn nhất và nhỏ nhất của dãy số
Lưu ý
Kích thức của mảng phải được khai báo bằng một
Trang 12BÀI TẬP
Trang 13b Var X : Array [5 10.5]of Integer;
Câu 1:Trong Pascal khai báo nào sau đây là đúng?
a Var X: Array [10,13] of Integer;
c Var X : Array[10 1] of Integer;
d Var X: Array [4 10] of Integer;
Đáp án
Làm lại
Tiếc quá …! Bạn chọn sai rồi
Hoan hô …! Đúng rồi …!
Trang 14Câu 2: Câu lệnh khai báo biến mảng sau đây máy tính có thực hiện được không?
Var N:Integer;
A : array [1 N] of Integer;
Trang 15-Xem lại nội dung bài học
-Làm bài tập 5 SGK trang 79
-Chuẩn bị bài thực hành 7:
”Xử lí dãy số trong chương trình.”
Trang 16Viết chương trình Pascal sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số Độ dài của dãy cũng được nhập từ bàn phím
-Khai báo (Chú ý cách khai báo mảng)
-Nhập độ dài của dãy số
-Nhập các phần tử của dãy số
-Xuất ra xem kết quả( Đề bài không yêu cầu)
Trang 17XIN CHÂN THÀNH CÁM ƠN QUÝ THẦY CÔ CÙNG CÁC EM HỌC SINH ĐÃ CHÚ Ý THEO DÕI
Tiết học kết thúc
KÍNH CHÚC QUÝ THẦY CÔ GIÁO CÙNG CÁC EM SỨC KHỎE VÀ
HẠNH PHÚC