*Pascal:
program bt;
uses crt;
var a: array[1..n] of integer;
n, i, max: integer;
begin
clrscr;
write('Nhap n la:'); readln(n);
for i := 1 to n do begin
write('Nhap a[',i,']=');
readln(a[i]);
end;
max := a[1];
for i := 2 to n do if a[i] > max then max := a[i];
writeln('So lon nhat trong mang la:', max :3);
readln
end.
*C/C++:
void nhap(int a[], int n)
{
for (int i = 0; i < n; i++)
{
printf("Nhap vao phan tu a[%d]: ", i);
scanf("%d", &a[i]);
}
}
int max(int a[], int n)
{
int max = a[0];
for (int i = 1; i < n; i++)
if (max < a[i])
max = a[i];
return max;
}
int main()
{
int a[1000];
int n;
printf("\nNhap n = ");
scanf("%d", &n);
nhap(a, n);
printf("\nMax = %d", max(a, n));
return 0;
}
Xin câu trả lời hay nhất ạ :3
