Определите чему будет равна переменная y после выполнения фрагмента программы, если x = 5:
if x >= 5 then y := x*x + 1 else y := x - 5;