Дано натуральное число N (1<=N<=10000). Требуется написать программу, определяющую для N, какая цифра больше – первая или последняя.

давно занимался программированием, решил немного освежить память

Тоже полезное занятие)

только Паскаль с тех пор ушел очень далеко... по крайней мере, в версии PascalABC.NET

Сейчас можно и так написать:

begin var s:=ReadInteger('Введите натуральное число: ').ToString; var c1:=s[1]; var cn:=s[s.Length]; if c1>cn then Writeln('Первая цифра больше последней') else if c1<cn then Writeln('Первая цифра меньше последней') else Writeln('Первая и последняя цифры одинаковы')end.