0026 打印所有大于平均数的数-控制台程序-极语言教程

常量 元素 8
整数 甲(元素)
小程序 初始启动
整数 数,累加=0,变浮点
浮点 平均数
循环于(数=0;数<元素;数++)
{
    读格式("%d",&甲(数))
    累加 + 甲(数)
}
平均数 = 1.0*累加/元素
写格式("平均数为 %f \r\n",平均数)
循环于(数=0;数<元素;数++)
{
    变浮点=甲(数)
    如果(:变浮点 > 平均数)
        写格式("大于平均数的输入数是 %d  \r\n",甲(数))
}
命令行("pause")
结束