Не совсем понимаю ваш вопрос. Эта программа выводит большее из трех чисел, как того и требовалось по условию. Вы хотите, чтобы вместе с числовым значением выводилась и его переменная, то записывается это, например, так: if (a>b) and (a>c) then Write('Максимальное число: a = ', a). Или вовсе без числового значения: Write('Максимальное число: a '). Аналогично поступаете c b и c.