Bài 6: Phép toán, biểu thức, câu lệnh gán

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Lê Huy

Viết chương trình nhập vào số nguyên dương N,dãy gồm N số nguyên A1,A2,...AN. Tìm và đưa ra màn hình giá trị lớn nhất của dãy số nguyên

Nguyễn Lê Phước Thịnh
4 tháng 5 2020 lúc 17:25

uses crt;

var n,i,max:integer;

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

begin

clrscr;

repeat

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

until (0<n) and (n<=100);

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('Gia tri lon nhat la: ',max);

readln;

end.


Các câu hỏi tương tự
trần duy hiếu
Xem chi tiết
Hồ Thị Thủy Tiên
Xem chi tiết
Hồ Thị Thủy Tiên
Xem chi tiết
Kiều Oanh
Xem chi tiết
Trần Lan Anh
Xem chi tiết
nguyễn thị cẩm tiên
Xem chi tiết
Nguyễn Triệu Nhật Khánh
Xem chi tiết
Nguyễn Cát Tường
Xem chi tiết
Smile Cong
Xem chi tiết