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