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

Uchiha Obito

sử dụng biến mảng Viết chương trình nhập vào một dãy số gồm n số nguyên từ bàn phím in ra màn hình giá trị lớn nhất của dãy số đó

Nguyễn Lê Phước Thịnh
9 tháng 5 2021 lúc 20:37

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(max);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
Uchiha Obito
Xem chi tiết
Mẫn Kim Anh
Xem chi tiết
Thư ĐT
Xem chi tiết
Huyền Trần
Xem chi tiết
Minh Đạt
Xem chi tiết
Nguyễn Như Ngọc
Xem chi tiết
Bảo Trâm
Xem chi tiết
Huỳnh Trúc Ly
Xem chi tiết
Nguyenthanh
Xem chi tiết