1. Trang chủ
  2. » Luận Văn - Báo Cáo

bai thuc hanh 7 tiet 60 gvdg

11 6 0

Đang tải... (xem toàn văn)

Tài liệu hạn chế xem trước, để xem đầy đủ mời bạn chọn Tải xuống

THÔNG TIN TÀI LIỆU

Thông tin cơ bản

Định dạng
Số trang 11
Dung lượng 99 KB

Nội dung

Tìm hiểu ý nghĩa của các câu lệnh trong chương trình sau đây:. Bài thực hành 7[r]

(1)(2)

KTBC:

1 Viết cú pháp câu lệnh lặp fordo

2 Cho đoạn chương trình sau cho biết đoạn chương trình thực nào?

n:=5;

For i:=1 to n begin

write(i, ‘ ‘);

(3)

Bài thực hành 7

XỬ LÍ DÃY SỐ TRONG CHƯƠNG TRÌNH (tt)

1 Mục đích, yêu cầu

- Tiếp tục làm quen với việc khai báo sử dụng biến mảng

- Rèn luyện kĩ sử dụng câu lệnh lặp

(4)

2 Nội dung

Bài 2:

a Thuật toán

B1: Nhập số bạn HS lớp (N=?)

B2: Nhập điểm Tốn Văn vào từ bàn phím B3: In điểm trung bình HS:

(điểm Tốn + điểm Văn)/2

B4: Tính điểm trung bình lớp theo môn: TBToanTBToan/N

TBVanTBVan/N

B5: In điểm TBToan , TBVan hình kết thúc

Bài thực hành 7

(5)

2 Nội dung

Bài 2:

b Tìm hiểu ý nghĩa câu lệnh chương trình sau đây:

Bài thực hành 7

(6)

Var i, n: integer;

TBToan, TBVan: real;

DiemToan, DiemVan: array [1 100] of real;

Begin

writeln(‘Diem trung binh: ‘); For i:=1 to n do

Writeln(i, ‘ ’, (DiemToan[i]+DiemVan[i])/2:3:1); TBToan:=0;

TBVan:=0;

For i:=1 to n do Begin TBToan:=TBToan+DiemToan[i]; TBVan:=TBVan+DiemVan[i] end; TBToan:=TBToan/N; TBVan:=TBVan/N;

Writeln(‘Diem trung binh mon Toan: ‘, TBToan:3:2); Writeln(‘Diem trung binh mon Van: ‘,TBVan:3:2);

(7)

2 Nội dung

Bài 2:

c Bổ sung câu lệnh cần thiết vào vị trí

thích hợp chương trình để chương trình hồn chỉnh.

Bài thực hành 7

(8)

Program Diem_trung_binh;

Uses crt;

Var i, n: integer;

TBToan, TBVan: real;

DiemToan, DiemVan: array [1 100] of real;

Begin

clrscr;

write(‘Nhap so cac ban HS lop, N =‘); readln(N); writeln(‘Nhap diem Toan: ‘);

For i:=1 to n do begin write(i, ‘ ‘); readln(DiemToan[i]); end;

Writeln(‘Nhap diem Van: ‘);

For i:=1 to n do begin write(i, ‘ ‘); readln(DiemVan[i]); end; writeln(‘Diem trung binh moi HS: ‘);

For i:=1 to n do

Writeln(i, ‘ ’, (DiemToan[i]+DiemVan[i])/2:3:1); TBToan:=0;

TBVan:=0;

For i:=1 to n do

Begin TBToan:=TBToan+DiemToan[i]; TBVan:=TBVan+DiemVan[i] end; TBToan:=TBToan/N; TBVan:=TBVan/N;

(9)

Bài thực hành 7

XỬ LÍ DÃY SỐ TRONG CHƯƠNG TRÌNH (tt)

2 Nội dung Bài 2:

d

Gõ đoạn chương trình trên, dịch chạy chương trì nh với số liệu thử.

N=3 (3 HS)HS Toán Văn

1. 2.

3. 7 9 8 7 5 6 7.0 6.0 8.0 8.0 6.0

Điểm TB HS

(10)

Dặn Dò:

• Về nhà ơn lại câu lệnh điều kiện, câu lệnh lặp, khai báo biến mảng

• Tập viết số chương trình đơn giản

(11)

Ngày đăng: 15/05/2021, 23:39

TỪ KHÓA LIÊN QUAN

TÀI LIỆU CÙNG NGƯỜI DÙNG

TÀI LIỆU LIÊN QUAN

w