Краткий ответ: 6,15625(если, конечно, нигде не обсчитался).Если не понимаешь задание и хочешь понять:Ввод x - вводится значение x(по условию - 13);Следующий шаг - присваиваются значения остальным переменным;Далее начинается цикл с постусловием (условие находится после тела цикла (ромбик)).На первом шаге z:=(1+6,5)/2 = 3,75, а i увеличивается на 1(то есть i становится равной 1).Далее идет проверка на соответствие i условию (i<4), если условие выполняется - цикл начинается заново, если нет - z выводится на экран и программа завершается.