Дано натуральное число. Верно ли, что первая цифра больше последней. Вывести сообщение на экран. Помогите пожалуйста. Паскаль. Информатика.

var   n:longint;   s:string; begin   Write('Введите натуральное число: '); Read(n);   Str(n,s);   if s[1]>s[Length(s)] then Writeln('Первая цифра больше последней')   else Writeln('Первая цифра не больше последней') end. Тестовое решение: Введите натуральное число: 526324 Первая цифра больше последней Введите натуральное число: 3783 Первая цифра не больше последней