#define FALSE 0 afx.h#define TRUE 1 afx.h#define NULL 0 afx.htypedef void VOID winnt.h // 短整型typedef unsigned shorttyped……继续阅读 » 弦苦 3年前 (2022-03-19) 2623浏览 0评论154个赞
CPlex,CFixedAlloc,Memory Pool……继续阅读 » 弦苦 3年前 (2022-03-19) 2530浏览 0评论569个赞
Pascal求N以内的完美数完全数(Perfect number),又称完美数或完备数,是一些特殊的自然数。它所有的真因子(即除了自身以外的约数)的和(即因子函数),恰好等于它本身。program bill02;var m,n,y,i,j,s,ss,z:longint;a:array[1..10000] of integer;beginre……继续阅读 » 水墨上仙 5年前 (2019-08-02) 1638浏览 2588个赞
设有一个m×n的棋盘(2≤m≤50,2≤n≤50),在棋盘上任一点有一个中国象棋“马”,马走的规则为:马走日字;马只能向右走。当m,n给出后,同时给出马起始的位置和终点的位置,试找出从起点到终点所有路径的数目。输入:    m,n,x1,y1,x2,y2 (分别表示m,n、起点……继续阅读 » 水墨上仙 5年前 (2019-08-02) 2932浏览 2667个赞
金明今天很开心,家里购置的新房就要领钥匙了,新房里有一间他自己专用的很宽敞的房间。更让他高兴的是,妈妈昨天对他说:“你的房间需要购买哪些物品,怎么布置,你说了算,只要不超过N 元钱就行”。今天一早金明就开始做预算,但是他想买的东西太多了,肯定会超过妈妈限定的N 元。于是,他把每件物品规定了一个重要度,分为5 等:用整数1~5 表示,第5 等最重要。他还从因特……继续阅读 » 水墨上仙 8年前 (2017-06-09) 2826浏览 350个赞
【石子合并】 在一个圆形操场的四周摆放着n 堆石子。现要将石子有次序地合并成一堆。规定每次只能选相邻的2 堆石子合并成新的一堆,并将新的一堆石子数记为该次合并的得分。 试设计一个算法,计算出将n堆石子合并成一堆的最小得分和最大得分。 【输入文件】 包含两行,第1 行是正整数n(1<=n<=100),表示有n堆石子。 第2行有n个数,分别表示每堆石……继续阅读 » 水墨上仙 8年前 (2017-06-01) 3033浏览 1282个赞
Pascal经典算法详解 – 最长递增子序列 给定数列A1,A2,…An,求最长递增子序列输入: 第一行一个整数n,表示有n个数(n<=1000) 第二行n个整数,用空格隔开。输出: 最长递增子序列长度。【分析】     在求以Ai为末元素的最长递……继续阅读 » 水墨上仙 8年前 (2017-05-31) 1427浏览 1922个赞