Pascal-数字总和

时间:2018-10-16 18:06:39

标签: pascal freepascal

我在pascal上有一个问题,就是我们要求用户输入一些数字N,然后在输出的总和中写入该数字AudioSegment的数字。 例如(from N to 1)

因此,在输出中将有N = 5。 或15 (5 + 4 + 3 + 2 + 1))直到N=11 (11 - 1+1 , 10 - 1+0 and then + 9 + 8 + .. + 1

感谢您的帮助。

1 个答案:

答案 0 :(得分:-1)

基本上,您需要将数字转换为字符串,遍历其字符,在每次迭代中,将字符转换回整数并将其添加到结果中。

UPD 我刚刚找到了一个没有类型转换的示例:https://www.danbarbulescu.com/pascal-function-that-calculates-the-sum-of-the-digits-of-a-number/