pascal Запоминание предыдущей введённой переменной в цикле