Есть 2 популярных вида кодировки: ASCII и Unicode. Кодировочные таблицы нужны для декодировки или кодировки сообщений. Например цифра "3" в таблице юникод кодируется как "<span>0033</span>".
Регистр
.......................................
4000:60с=66.66666666666667
66.66666666666667*45=3000
Вероятно имеется в виду, что некоторые строки нужно исправить.
в третьей строке я добавил бы спереди слово var:
<span>var i,max: integer;</span>
а хвост программы подправил бы так:
writeln;
max := a[1] ;
for i:= 2 to n do
if a[i] > max then max:= a[i] ;
writeln('max: ', max );
<span>end.
</span>
жирным выделены добавки к исходному тексту.