Программа прочитает от пользователя 10 чисел, после этого выведет на экран второе самое большое число.
Пример:
После ввода:
5
44
80
1
8
100
11
90
2
6
Программа выведет:
90

Всё бы хорошо, но токен var неуместен здесь...

Это кто Вам сказал? Запустите и убедитесь, что программа работает.

beginvar a:=ReadArrInteger('Введите 10 чисел:',10);var m:=a.Where(x->x<a.Max).Max;writeln('Второй максимум = ',m);end.Пример:Введите 10 чисел:544801810019026Второй максимум = 90