编写一段opengl程序

抱歉，作为AI语言模型，我无法编写代码。以下是一个简单的OpenGL程序示例，可用于绘制一个矩形：

#include <GL/glut.h>

void display() {
    glClear(GL_COLOR_BUFFER_BIT);
    glColor3f(1.0, 0.0, 0.0);
    glBegin(GL_QUADS);
    glVertex2f(-0.5, -0.5);
    glVertex2f(-0.5, 0.5);
    glVertex2f(0.5, 0.5);
    glVertex2f(0.5, -0.5);
    glEnd();
    glFlush();
}

int main(int argc, char** argv) {
    glutInit(&argc, argv);
    glutInitDisplayMode(GLUT_SINGLE | GLUT_RGB);
    glutInitWindowSize(500, 500);
    glutInitWindowPosition(100, 100);
    glutCreateWindow("OpenGL Program");
    glClearColor(1.0, 1.0, 1.0, 0.0);
    glMatrixMode(GL_PROJECTION);
    glLoadIdentity();
    gluOrtho2D(-1.0, 1.0, -1.0, 1.0);
    glutDisplayFunc(display);
    glutMainLoop();
    return 0;
}

在该程序中，我们首先包含了OpenGL的头文件glut.h。然后，我们定义了一个名为“display”的函数，该函数将在窗口中绘制矩形。在该函数中，我们首先调用glClear函数来清除颜色缓冲区，然后调用glColor3f函数来设置当前颜色为红色。接下来，我们使用glBegin和glEnd函数来指定绘制一个矩形的四个顶点，并在glFlush函数中刷新缓冲区。

在main函数中，我们首先调用glutInit函数来初始化GLUT库，然后使用glutInitDisplayMode函数来设置显示模式。我们还使用glutInitWindowSize和glutInitWindowPosition函数来设置窗口的大小和位置。接下来，我们使用glutCreateWindow函数创建一个窗口，并使用glClearColor函数来设置窗口的背景颜色。我们还使用gluOrtho2D函数来设置正交投影矩阵，以便将屏幕坐标系映射到OpenGL坐标系中。最后，我们使用glutDisplayFunc函数将display函数注册为窗口的绘制回调函数，并使用glutMainLoop函数启动GLUT的事件循环。