1. Ổn định lớp
2. Phõn việc cho từng nhúm thực hành.
3. Bài mới:
Hoạt động của thầy Hoạt động của trũ Nội dung
Chương trỡnh tớnh tổng dĩy Chương trỡnh tớnh tổng dĩy số, in ra màn hỡnh dĩy số vừa nhập. HS chia nhúm làm thực hành. Bài 3: Program P_Sum; Var i, n, Sum : integer; A: array[1..100] of integer; Begin
write('Hay nhap do dai cua day so, N = '); readln(n); '); readln(n);
writeln('Nhap cac phan tu cua day so:'); For i:=1 to n do For i:=1 to n do Begin write('a[',i,']='); readln(a[i]); End; Sum:=0; Chương trỡnh tớnh tổng dĩy số, in ra màn hỡnh dĩy số vừa nhập.
Bổ sung và chỉnh sửachương trỡnh trong BT2 chương trỡnh trong BT2 (tiết 59 ) để nhập 2 loại điểm Toỏn và Ngữ văn của cỏc bạn. Sau đú in ra màn hỡnh :
a/ điểm TB của mỗi bạntrong lớp theo cụng thức: trong lớp theo cụng thức: Điểm TB = (Điểm toỏn + điểm văn)/2
b/ Điểm TB của cả lớp theotừng mụn Toỏn và Ngữ văn từng mụn Toỏn và Ngữ văn
HS chia nhúm làm thực hành. hành.
for i:=1 to n do Sum:= Sum + a[i]; a[i];
write('Day so vua nhap la: '); for i:=1 to n do write(a[i], ' '); for i:=1 to n do write(a[i], ' '); writeln;
write('Tong day so la = ',Sum); readln; readln; End. Bài 4: Program Xep_loai; uses crt; Var i, n: integer;
TBtoan, TBvan: real;
diemT, diemV: array[1..100] of real;
Beginclrscr; clrscr;
writeln('Diem TB : '); For i:=1 to n do For i:=1 to n do
write(i,' . ',(diemT[i] + diemV[i])/2:3:1);TBtoan: =0; TBvan: =0; TBtoan: =0; TBvan: =0;
For i:=1 to n do Begin Begin
TBtoan: = TBtoan + diemT[i] ; TBvan: = TBvan + diemV[i] ; TBvan: = TBvan + diemV[i] ; end;
TBtoan: = TBtoan /n; TBvan: = TBvan /n; TBvan: = TBvan /n;
writeln('Diem TB mon Toan : ',TBtoan :3:2); 3:2);
writeln('Diem TB mon Van: ',TBvan :3:2); 3:2); readln; End. Bổ sung và chỉnh sửa chương trỡnh trong BT2 (tiết 59 ) để nhập 2 loại điểm Toỏn và Ngữ văn của cỏc bạn. Sau đú in ra màn hỡnh : a/ điểm TB của mỗi bạn trong lớp theo cụng thức:
Điểm TB = (Điểmtoỏn + điểm văn)/2 toỏn + điểm văn)/2 b/ Điểm TB của cả lớp theo từng mụn Toỏn và Ngữ văn
IV. CỦNG CỐ VÀ HƯỚNG DẪN VỀ NHÀ1. Củng cố) 1. Củng cố)
Giỏo viờn nhận xột và đỏnh giỏ tiết thực hành.
2. Hướng dẫn về nhà