unsigned short --> int: unsigned short было нужно для приведения к типу Паскаля word в 18 задаче. В этой задаче лучше использовать int
28: unsigned short -> int