亲密对数C语言程序

一、亲密对数C语言程序

这段代码定义了一个名为"亲密对数C语言程序"的程序，它主要包含两个函数：FactorSum()用于计算一个整数的亲密对数，IntimatePair()则用于查找给定范围内存在亲密对数的整数对并输出。程序的核心逻辑如下：

首先，FactorSum函数接受一个整数fac作为输入，计算其亲密对数。亲密对数定义为一个数的因数之和减去自身。函数通过循环遍历从2到根号fac的整数，如果fac能被i整除，就将fac/i和i相加，并累加到sum中。如果循环结束时ret（根号fac）与fac相等，还需减去ret。最后返回sum。

IntimatePair函数接收一个范围参数range，创建一个结构体数组inti用于存储每个整数及其亲密对数。它遍历整数范围内的每个数，计算并存储亲密对数。接着，它遍历数组，对每一对未标记的整数进行比较，如果它们的亲密对数相等，且自身也相等，就标记这两个数并输出它们的值。最后返回已找到的亲密对数对的数量。

在main函数中，调用IntimatePair函数，参数为N（400），执行亲密对数的查找和输出过程。

亲密对数就是指两个整数，除了整数本身外的其所有因子之和等于另一个整数，则这两个数为亲密对数。如220和284。220的因子是1、2、4、5、10、11、20,、22、44、55、110，它们之和为284，而284的因子是1、2、4、71、142，它们之和为220，所以220与284为一对亲密对数。

二、C语言代码套用在Delphi编程中[1]

1、 Delphi适合用来开发应用程序但是有时侯一些底层的东西可以直接使用C语言来开发我在公司经常开发跟硬件相关的项目而很多硬件的SDK包是用C来写的这个时候我一般把它们转换成Delphi(PASCAL)语法的代码

2、一:将C语言的程序编译成DLL供Delphi调用这种方法过于简单而且需要额外带一个DLL文件所以不在本文的讨论范围之内

3、二:直接转换C语言代码到DELPHI代码

4、 C语言的函数格式与Delphi不同它们是函数返回类型在前函数声明在后对于没有任何返回类型的函数则定义为VOID类型

5、例如:Delphi中函数function MyFunction:(intIN:integer):Bool;相应的C语言代码就变成Bool MyFunction(int intIN);又例如procedure MyProcedure;====>void MyProcedure;采用这种方法一般要求对C语言比较熟悉我一般是采用这种方法下面是我收集整理的自己常用的Delphi与C之间的类型对应表其中左边是C类型右边是对应的Delphi类型:

三、C语言中的Write函数

原形：int write(int handle,char*buf,unsigned len)

功能：将缓冲区的数据写入与handle相联的文件或设备中，handle是从creat、open、dup或dup2调用中得到的文件句柄。

对于磁盘或磁盘文件，写操作从当前文件指针处开始,对于用O_APPEND选项打开的文件，写数据之前，文件指针指向EOF；对于设备，字节被直接传送到设备中。

write有两种用法。一种是：ssize_t write(int fd, const void*buf, size_t nbyte);

buf：指定的缓冲区，即指针，指向一段内存单元；

nbyte：要写入文件指定的字节数；

返回值：写入文档的字节数（成功）；-1（出错）

write函数把buf中nbyte写入文件描述符handle所指的文档，成功时返回写的字节数，错误时返回-1.

另一种是： write（const char* str,int n)

str是字符指针或字符数组，用来存放一个字符串。n是int型数，它用来表示输出显示字符串中字符的个数。

write（"string",strlen("string");表示输出字符串常量

参考资料来源：百度百科-write函数