Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Bùi Nguyễn Minh Hoàng

Cho 1 mảng số nguyên viết chương trình nhập vào dãy số gồm 10 phần tử tìm số lớn nhất trong 10 phần tử vừa nhập

Nguyễn Lê Phước Thịnh
12 tháng 5 2021 lúc 18:44

uses crt;

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

i,n,max:integer;

begin

clrscr;

n:=10;

for i:=1 to n do

  begin

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

end;

max:=a[1];

for i:=1 to n do 

 if max<a[i] then max:=a[i];

writeln(max);

readln;

end.


Các câu hỏi tương tự
Mai Phương Lê
Xem chi tiết
Tran Trang
Xem chi tiết
Lương Trần Phương Linh
Xem chi tiết
Minh Duy
Xem chi tiết
Vochehoang
Xem chi tiết
Vochehoang
Xem chi tiết
Thị Yến Nhi Trịnh
Xem chi tiết
my trần
Xem chi tiết
Thwn Dayy
Xem chi tiết