Tin học viết chương trình

ĐT.ChâuGiang

Học sinh
Thành viên
17 Tháng chín 2017
198
147
46
21
Quảng Ngãi
THCS ba động

ka1412

Học sinh chăm học
Thành viên
24 Tháng mười một 2017
874
730
121
Hà Nội
CNN | Life
Mã:
for i:=1 to n do
begin
write('a[',i,']:');readln(a[i]);
if i=1 then m:=a[1] else if a[i]>m then m:=a[i];
end;
write('So lon nhat la:',m);
Phần còn lại bạn tự lm nha
 
Top Bottom