Viết chương trình pascal nhập n số nguyên từ bàn phím và ghi ra màn hình số lớn nhất trong các số đó. Số n cũng được nhập vào từ bàn phím.(Ai giải hộ em với ạ)
Câu trả lời được xác thực chứa thông tin chính xác và đáng tin cậy, được xác nhận hoặc trả lời bởi các chuyên gia, giáo viên hàng đầu của chúng tôi.
program baitap; uses crt; var n,i,max : integer; a : array[1..100] of integer; begin clrscr; write('Nhap so n :'); readln(n); for i:=1 to n do begin write('Nhap phan tu thu ',i,' la : '); readln(a[i]); end; max:=a[1]; for i:=2 to n do if max<a[i] then max:=a[i]; write('So lon nhat trong mang la :', max); readln end.
var a:array[1..1000000] of integer; max,n,i:integer; begin write('nhap n :'); read(n); for i:=1 to n do begin write('a[',i,']='); read(a[i]); end; max:=a[1]; for i:=1 to n do if max<a[i] then max:=a[i]; write('So lon nhat la: ',max); end.