...
Nhap so phan tu cua day so: n=
7
Nhap so thu 1 :
7
Nhap so thu 2 :
9
Nhap so thu 3 :
4
Nhap so thu 4 :
6
Nhap so thu 5 :
9
Nhap so thu 6 :
8
Nhap so thu 7 :
5
So lon nhat la Max = 9
So ... ;
A: Array[1 100] of Integer ;
BEGIN
Clrscr;
write(‘ Nhap so phan tu cua day so: n= ’) ; readln(n) ;
For i := 1 to n do
Begin
write(‘ Nhap so thu ‘,i,’ : ‘) ;
readl...
... dới
đây:
Begin
clrscr;
write('Hay nhap do dai cua day so, N =
'); readln(n);
writeln('Nhap cac phan tu cua day
so: ');
For i:=1 to n do
- 4 -
- GV: Ví dụ nh trong Pascal ... nhập Diem_i;
Với i = 1 đến 50: hÃy so sánh Max
với Diem_i;
màn hình điểm số cao nhất. Vì mỗi biến
chỉ có thể lu một giá trị duy nhất, để có
thể nhập điểm và so sánh chúng, ta cần
s...
... xử
lí dữ liệu một cách đơn giản:
+ Với i = 1 đến 100: Hãy nhập Diem_i;
+ Với i = 1 đến 100: Hãy so sánh Max với
Diem_i;
* Dữ liệu kiểu mảng:Là một tập hợp hữu
hạn các phần tử có thứ tự
+ Mọi ... Tên biến mảng
[chỉ số phần tử]
như Diem[1],…
+ Có thể thực
hiện các thao tác
như gán giá trị, so
sánh, viết giá trị
2. Ví dụ về biến mảng:
- Cách khai báo biến mảng trong các ngôn
ngữ lậ...
... và in ra số lớn nhất trong các số
vừa nhập, em có nhận xét gì so với bài tập trên?
(khai báo 100 biến, 100 lệnh nhập dữ liệu, so sánh
giá trị với 99 số còn lại … chương trình sẻ rất dài,
dễ ... mảng
In mảng
2. Củng cố
2. Củng cố
3. Dặn dò
I,n:integer;
A: array[1 20] of integer;
Writeln(‘ nhap so phan tu’);
Readln(n);
For i:=1 to n do
Begin
Writeln(‘ Nhap gia tri a[‘,i,’]=‘);
Readln(n...
... 100] of integer;
Begin
clrscr;
write('Hay nhap do dai cua day so, = ');
readln(n);
writeln('Nhap cac phan tu cua day so: ');
2. Ví dụ về biến mảng.
Mỗi học sinh có nhiều điểm ... Max<a[i] then Max:=a[i];
if Min>a[i] then Min:=a[i]
end;
write(&apos ;So lon nhat la Max = ',Max);
write(&apos ;So nho nhat la Min = ',Min);
Readln
End.
2. Ví dụ v...