Bài giảng Tin học Lớp 11 - Bài 11: Mảng một chiều - Trường THCS & THPT Mỹ Hòa Hưng
Bài toán đặt vấn đề:
Nhập vào nhiệt độ (trung bình) của mỗi ngày trong tuần. Tính và đưa ra màn hình nhiệt độ trung bình của tuần và số lượng ngày có nhiệt độ TB cao hơn nhiệt trung bình trong tuần?
Dữ liệu nhập vào (INPUT): t1,t2,t3,t4,t5,t6,t7.
Dữ cần tính và in ra (OUTPUT): tb, dem.
ãy xác định Input, Output và viết chương trình giải bài toán trên ?
Nhập vào nhiệt độ (trung bình) của mỗi ngày trong tuần. Tính và đưa ra màn hình nhiệt độ trung bình của tuần và số lượng ngày có nhiệt độ TB cao hơn nhiệt trung bình trong tuần?
Dữ liệu nhập vào (INPUT): t1,t2,t3,t4,t5,t6,t7.
Dữ cần tính và in ra (OUTPUT): tb, dem.
ãy xác định Input, Output và viết chương trình giải bài toán trên ?
13 trang
14/03/2023
660
Bạn đang xem tài liệu "Bài giảng Tin học Lớp 11 - Bài 11: Mảng một chiều - Trường THCS & THPT Mỹ Hòa Hưng", để tải tài liệu gốc về máy hãy click vào nút Download ở trên.
File đính kèm:
- bai_giang_tin_hoc_lop_11_bai_11_mang_mot_chieu_truong_thcs_t.ppt
Nội dung text: Bài giảng Tin học Lớp 11 - Bài 11: Mảng một chiều - Trường THCS & THPT Mỹ Hòa Hưng
- Bài 11 Giáo án điện tử tin học lớp 11
- Program vd1; Uses crt; Var t1,t2,t3,t4,t5,t6,t7,tb : real; dem : integer; BEGIN Clrscr; write(‘ Nhap vao nhiet do 7 ngay : ’); readln(t1,t2,t3,t4,t5,t6,t7); tb : = (t1+t2+t3+t4+t5+t6+t7)/7; dem : = 0 ; if (t1>tb) then dem := dem + 1; if (t2>tb) then dem := dem + 1; if (t3>tb) then dem := dem + 1; if (t4>tb) then dem := dem + 1; if (t5>tb) then dem := dem + 1; if (t6>tb) then dem := dem + 1; if (t7>tb) then dem : = dem + 1; Writeln(‘ Nhiet do trung binh trong tuan = ‘,tb : 6 : 2); Writeln(‘ so ngay co nhiet do cao hon nhiet do tb ‘, dem); Readln; END.
- 1. Khái niệm Mảng một chiều là một dãy hữu hạn các phần tử cùng kiểu Ví dụ: A 17 20 18 25 1919 12 19 1 2 3 4 5 6 7 Trong đó : Tên mảng : A. Số phần tử của mảng: 7. Kiểu dữ liệu của các phần tử: Kiểu nguyên. Khi tham chiếu đến phần tử thứ i ta viết A[i]. Ví dụ: A[5] = 19.
- 3. Các thao tác xử lí trong mảng một chiều a. Nhập mảng một chiều Ví dụ: Nhập nhiệt độ n ngày. A 17 20 18 21 19 17 19 với nn = 7 Các bớc Thể hiện bằng pascal 1. Nhập số phần tử của mảng (n). Write(‘ Nhap vao so ngay:’); Readln(n); 2. Nhập vào giá trị của các phần tử For i:=1 to n do trong mảng (A[i]). Begin write(‘nhiet do ngay thu’ ,i, ’ : ’); readln(A[i]); end;
- c. Các thao tác xử lí khác * Đếm các phần tử trong mảng thoả mãn điều kiện cho trớc Ví dụ: Đếm số ngày có nhiệt độ cao dem :=0; hơn nhiệt độ TB của tuần. For i :=1 to n do IF A[i]>TB then dem:=dem+1; i 1 2 3 4 5 6 7 A[i] 17 20 18 2121 19 17 19 TB = 18.7 Dem=0 0 1 1 2 3 3 4 +1 +1 +1 +1
- Chơng trình chạy và cho kết quả nh sau: Nhap vao so ngay : 7 Nhap nhiet do ngay thu 1 : 17 Nhap nhiet do ngay thu 2 : 20 Nhap nhiet do ngay thu 3 : 18 Nhap nhiet do ngay thu 4 : 21 Nhap nhiet do ngay thu 5 : 19 Nhap nhiet do ngay thu 6 : 17 Nhap nhiet do ngay thu 7 : 19 Nhiet do trung binh 7 ngay = 18.70 So ngay co nhiet do cao hon nhiet do TB la: 4
- Hãy nhớ! ➢ Mảng một chiều là một dãy hữu 15 20 19 25 18 12 16 hạn các phần tử cùng kiểu. ➢ Khai báo: tên mảng, chỉ số đầu, Var A:ARRAY[1 100] OF integer; chỉ số cuối, kiểu phần tử. ➢ Tham chiếu phần tử mảng: A[5] = 18 Tên biến mảng[chỉ số phần tử] ➢ Nhiều thao tác xử lí mảng dùng cấu trúc lặp FOR TO DO.
