Thực hành Word

Một số ví dụ Ví dụ 1 Ví dụ 2 Chú ý Bài toán: Nhập vào số cân nặng của các bạn trong tổ em 7 bạn và đưa ra màn hình số bạn có cân nặng cao hơn trung bình của cả tổ.. -Có bao nhiêu phần

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

Ví dụ 3

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

Ví dụ 3

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2 Chú ý

Bài toán: Nhập vào số cân nặng của các bạn

trong tổ em (7 bạn) và đưa ra màn hình số bạn

có cân nặng cao hơn trung bình của cả tổ

-Có bao nhiêu phần tử?

-Kiểu dữ liệu của các phần tử trên?

7 phần tử Real

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

Ví dụ 3

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

a Khai báo:

Cách 1: Khai báo trực tiếp

Var <tên biến mảng>:array[kiểu chỉ số]of <kiểu phần tử>;

Cách 2: Khai báo gián tiếp

Type <tên kiểu mảng>=array[kiểu chỉ số]of <kiểu phần tử>;

var <tên biến mảng>: tên kiểu mảng;

Giải thích: Kiểu chỉ số: Có dạng m n

m: chỉ số đầu n: chỉ số cuối (m<=n) Kiểu phần tử: Là kiểu của các phần tử mảng.

Ví dụ 1: c: array[1 7]of real;

Ví dụ 2: type nang=array[1 7] of real;

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

Ví dụ 3

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

a Khai báo:

Cách 1: Khai báo trực tiếp

Var <tên biến mảng>:array[kiểu chỉ số]of <kiểu phần tử>;

Cách 2: Khai báo gián tiếp

Type <tên kiểu mảng>=array[kiểu chỉ số]of <kiểu phần tử>;

var <tên biến mảng>: tên kiểu mảng;

Cách tham chiếu: tên_mảng[chỉ_số]

Ví dụ: c[3] (cân nặng của bạn thứ 3)40 43 47 42 50 40 41 47

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

Ví dụ 3

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

em và đưa ra màn hình số bạn có cân nặng cao hơn trung bình của cả tổ

Var c:array[1 max]of real;

s,tb:real;

dem,n,i:integer;

Begin

write(‘Nhap so ban:’); readln(n);

For i:=1 to n do

begin write(‘Nguoi thu ’,i,’ la: ‘);Readln(c[i]);

end;

Dem:=0;

S:=0;

For i:=1 to n do s:=s+c[i];

Tb:=s/n;

For i:=1 to n do

if c[i]>tb then dem:=dem+1;

Writeln(‘So ban co CN cao hon ‘,tb:8:3,’ la:’,dem); Readln;

End.

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

Ví dụ 3

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2 Chú ý

Quan sát và chọn khai khai báo đúng.

Type

A Arrayr=array[1 200]of real;

B Arrayr=array[byte]of real;

C Arrayb=array[-100 0]of boolean;

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

Ví dụ 3

a Khai báo

b Một số ví dụ

Ví dụ 1

Ví dụ 2

Quan sát và chọn khai khai báo đúng.

Type

A Arrayr=array[‘A’ ’Z’]of byte;

B Arrayr=array[A B]of char;

C Arrayb=array[1…100]of boolean;