pascal 麻烦给个程序和详细解说!易碎的流星（star） 某人无聊之时想出了一个小游戏,规则如下,电脑屏幕上不停落下随机颜色的流星,你可以控制他的落点,若两颗以上流星落在同一点上,他们会

pascal 麻烦给个程序和详细解说!易碎的流星（star） 某人无聊之时想出了一个小游戏,规则如下,电脑屏幕上不停落下随机颜色的流星,你可以控制他的落点,若两颗以上流星落在同一点上,他们会
pascal 麻烦给个程序和详细解说!
易碎的流星（star） 某人无聊之时想出了一个小游戏,规则如下,电脑屏幕上不停落下随机颜色的流星,你可以控制他的落点,若两颗以上流星落在同一点上,他们会不停堆叠,最后落下的的流星堆在最上方.这些流星是有魔力的,若是某堆流星顶上有某颗流星和与他颜色相同的流星堆叠,他们俩将会发生能量碰撞,放出绚烂美丽的耀眼魔光,但是之后两颗流星都会破碎,从流星堆上消失.最为神奇的是还有一种彩色流星,他能传导其他流星的魔力,但两颗彩色流星相遇不会立即发生能量碰撞.如果两颗相同颜色的流星之间全部都是彩色流星,那么他们也会发生能量碰撞,而且他们之间的彩色流星也会参与能量碰撞,这些彩色流星也最后也将破碎.参与能量碰撞的流星越多,碰撞激发的魔光的强度越大,定义K颗流星参与的一次能量碰撞的发光强度为2+K.某人把这个游戏交给笨笨玩,可是笨笨不怎么会玩电脑,只知道将所有的流星都堆在同一个地方.身为大牛的你看不下去了,你决定帮他计算他能激发的能量碰撞的总发光强度（所有能量碰撞的发光强度之和）.输入格式 第一行一个数N,为落下的流星总数.接下来N行,每行为一个非负整数,不同数字（不超过MAXLONGINT ）表示不同颜色的流星,0表示彩色流星.排列的顺序即是流星下落的先后顺序.输出格式 一行 一个数字来表示能量碰撞的总发光强度（所有能量碰撞的发光强度之和）.样例输入 10 1 1 2 3 0 0 0 3 2 1 样例输出 15

pascal 麻烦给个程序和详细解说!易碎的流星（star） 某人无聊之时想出了一个小游戏,规则如下,电脑屏幕上不停落下随机颜色的流星,你可以控制他的落点,若两颗以上流星落在同一点上,他们会
和阅读程序题 的详细解答,谢谢~! 第十三届全国青少年信息学奥林匹克联赛初赛试题（ 普及组 Pascal 语言 二小时完成）● ● 全部试题答案均要求写在