Bài 11: Kiểu mảng

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Hoàng Văn Xanh

Chương trình nhập vào một dãy số nguyên sau đó tìm đồng thời giá trị nhỏ nhất của dãy số

Nguyễn Lê Phước Thịnh
7 tháng 4 2021 lúc 13:32

uses crt;

var a:array[1..100]of integer;

i,n,min:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

 begin

write('A[',i,']='); readln(a[i]);

end;

min:=a[1];

for i:=1 to n do 

 if min>a[i] then min:=a[i];

writeln(min);

readln;

end.


Các câu hỏi tương tự
Cuppy Cake
Xem chi tiết
Nguyễn Thị Bích Huyền
Xem chi tiết
Leoumax
Xem chi tiết
Phan Thị T.Chinh
Xem chi tiết
Phan Phước Quốc Thịnh
Xem chi tiết
nguyễn an phát
Xem chi tiết
Phan uyển nhi
Xem chi tiết
Nguyễn Phú Trọng
Xem chi tiết
Lee Jihoon
Xem chi tiết