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

Trương Trịnh Minh Thư

viết chương trình nhập vào 1 dãy số A có N số nguyên (N<=100), rồi in ra màn hình giá trị lớn nhất của dãy số đó pascal

Giúp với ạ <3

híp
28 tháng 4 2019 lúc 8:44

program sln;

var i,n,SLN:integer;

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

begin

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

for i:=1 to n do

begin

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

end;

SLN:=a[1];

for i:=2 to n do if SLN < a[i] then SLN:=a[i];

write('so lon nhat la:',SLN);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
Uchiha Obito
Xem chi tiết
Tuoi tom May
Xem chi tiết
Huy Hoang Nguyen
Xem chi tiết
Phương Linh
Xem chi tiết
Nguyễn minh quân
Xem chi tiết
Châu Thùy
Xem chi tiết
Lê Thị Phương Dung
Xem chi tiết
Jeri James
Xem chi tiết
Ánh sao
Xem chi tiết
Uchiha Obito
Xem chi tiết