编写程序，利用IAP15W4K58S4 单片机的内部串口1，分别利用查询和中断，实现串口收发的双向通信，单片机主时钟频率 18.432MHz，波特率常数115200bps。（程序核心语句要有注释，通信内容涉及学号和姓名拼音）

在使用IAP15W4K58S4单片机通过内部串口1进行双向通信时，通常会涉及到初始化串口、设置波特率以及接收和发送数据。这里提供一个简化的示例程序核心部分，假设我们已经包含了必要的头文件，并定义了相关的寄存器变量：

#include "IAP15W4K58S4.h" // 引入IAP15W4K58S4的头文件

// 定义串口1全局变量
UART_TypeDef *uart = UART1; // 使用UART1
uint8_t RxBuffer[20]; // 接收缓冲区
volatile uint8_t RxIndex = 0; // 接收索引
volatile uint8_t TxData = 0; // 发送数据

// 初始化串口1，115200波特率
void init_UART1() {
    // 硬件复位串口
    UART_Reset(uart);
    
    // 设置工作模式为异步通信，8位数据，无校验，1个停止位
    UART_Init(uart, UART_MODE_8N1, 115200);
}

// 查询方式读取串口数据
void read_UART1_query() {
    while (!UART_IsRxEmpty(uart)); // 当串口有新数据时阻塞等待
    RxBuffer[RxIndex++] = UART_Read(uart); // 读取并存储数据
    if (RxIndex == sizeof(RxBuffer)) { // 满缓冲区则清除接收索引
        RxIndex = 0;
    }
}

// 中断方式处理串口接收
void USART_IRQHandler(void) __attribute__((interrupt("USART1_RX"))) {
    RxBuffer[RxIndex++] = UART_Read(uart); // 同样读取数据并更新索引
    ... // 处理接收完成后的操作，如解析学号姓名拼音等
}

// 发送字符串到串口
void send_data(const char *data) {
    while (*data != '\0') { // 遍历字符串
        UART_Send(uart, (uint8_t)*data++);
    }
    UART_Send(uart, '\r'); // 发送换行符
    UART_Send(uart, '\n'); // 发送回车符
}

int main(void) {
    init_UART1();
    ... // 开启串口接收中断
    // 主循环，接收并发送数据
    while (1) {
        // 查询方式接收
        read_UART1_query();
        
        // 检查接收到的数据是否包含学号和姓名
        if (/* 数据解析条件 */) {
            send_data("接收到您的信息: 学号：...");
        }
        
        // 发送请求数据
        send_data("请输入您的学号和姓名:");
    }

    return 0;
}

注意：这只是一个简化版的核心代码片段，实际应用中还需要添加错误检查、数据解析和用户输入处理等功能。同时，为了使用中断，你需要配置相应的中断向量表，并开启中断。