Пожалуйста,составьте программу поиска первой цифры натурального числа N

Так как число может быть большим, то для его описания применим тип longint.При помощи процедуры Str превращаем число n в строку S, выделяем первую букву этой строки (S[1]), а затем при помощи процедуры Val переводим обратно строку в цифру: