Ребят, срочно нужна помощь. Надо написать программу га языке паскаль которая
 определяет одинаковые ли цифры стоят в начале и конце числа N.

uses crt;var a,b,c: Integer;Begin Write('Введите число: '); Readln(a); While a>=10 do a:=a div 10; b:=a; c:=a mod 10; If b=c then Writeln('Первая и последняя цифра данного числа одинаковы.') Else writeln('Первая и последняя цифры введённого числа не совпадают');End.