Bài 9. Làm việc với dãy số

TT

cho dãy a gồm n số nguyên a1 a2 ...an. với n được nhập từ bàn phím. hãy tính và đưa ra màn hình giá trị lớn nhất.

nhờ các bạn viết hộ mik CT:

NT
3 tháng 6 2020 lúc 5:53

uses crt;

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

i,n,max:integer;

begin

clrscr;

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

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ự
UO
Xem chi tiết
TM
Xem chi tiết
VT
Xem chi tiết
HN
Xem chi tiết
NT
Xem chi tiết
H24
Xem chi tiết
HL
Xem chi tiết
MA
Xem chi tiết
NN
Xem chi tiết