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

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.

Bình luận (0)

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