Python:

n = int(input("Nhập số phần tử có trong dãy số: "))
lst = []
count = 0
for i in range(1, n + 1):
      lst.append(int(input("lst[" + str(count) + "]: ")))
      count += 1 
print("Giá trị lớn nhất trong dãy số là: ", max(lst))
a = max(lst)
h = 0
for i in lst:
      if i == a:
          print("Vị trí của giá trị đó trong dãy số là: ", h)
      h += 1

uses crt;
 var a : array[1..100] of longint ;
  n,i,max,cs: longint ;
   begin
    clrscr;
write('N=');
 readln(n);
for i := 1 to n do
     begin
    write('a[',i,']=');
    readln(a[i]);
     end;
max:=a[1];
  for i := 2 to n do
    if max < a[i] then 
     begin
     max := a[i];
     cs := i ;
     end;
 writeln('GTLN ',max,',vi tri: ',cs);
  readln 
     end .