Дано трехзначное число. определить: начинается ли оно с цифры 5. программа на паскале.

Допустим ваше число записано в переменной a, тогда
if a div 100 = 5 then writeln('Является') else writeln('Не является')