Sein Cannie
Hỏi từ APP VIETJACK
Viết chương trình Pacscal sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số. In ra màn hình số lớn nhất của dãy số và nhỏ nhất của dãy số.
Quảng cáo
1 câu trả lời 375
4 năm trước
Uses Crt;
Var A: array [1..50] of Integer;
max,min,n,i: Integer;
Begin
Clrscr;
Write('N= ');Readln(n);
For i:=1 to n do
Write('a[',i,']= ');
Readln(a[i]);
Writeln;
Write('So lon nhat trong mang la: ');
max:=a[1];
For i:=1 to n do
If max<a[i] then max:=a[i];
Write(max);
Writeln;
Write('So be nhat trong mang la: ');
min:=0;
For i:=1 to n do
If min>a[i] then min:=a[i];
Write(min);
Readln
End.
---//-----
Chúc bạn học tốt ~~
Quảng cáo
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK44718
-
Hỏi từ APP VIETJACK26336
Thành viên hăng hái nhất trong tuần
-
୭୨୧Đức亗୨୧୭⚡️⚽️
305 điểm
-
Omachi
185 điểm
-
Sad
60 điểm
-
Zin Phan 60 điểm
-
truc chu 55 điểm
-
LILY
40 điểm
-
Phạm bảo an Phạm 35 điểm
-
Pũng Lì Cá 30 điểm
-
VuNguyen✓★ 20 điểm
-
Kiên Nguyễn Trung 20 điểm
-
Tấn Thắng Nguyễn 20 điểm
-
Hoàn Trịnh 20 điểm
-
Tần Nguyễn 20 điểm
-
Quốc Đạt Nguyễn 20 điểm
Rút gọn
Bài viết mới nhất Lớp 8
-
3 năm trước7476
-
3 năm trước7102
-
3 năm trước6126
-
3 năm trước5870
-
3 năm trước5941
Gửi báo cáo thành công!
