[Pascal][简单题]无比顺利

本文介绍了一道关于数学序列的编程题,题目要求求出由6组成的递增序列的前n项和,并提供了一个使用Pascal语言实现的示例代码。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

问题 P: 无比顺利

时间限制: 1 Sec  内存限制: 128 MB

题目描述

中国人非常喜欢6这个数字,因为大家总爱说66大顺啊。数学狂人叶某人喜欢把什么都数字化,于是她把顺利这个词也定义了数量级,6代表1级顺利,66代表2级顺利,666代表3级顺利,以此类推。你看,数学狂人的世界总是让人无法理解。今天,叶某人决定将数学进行到底,现在她设前n级顺利的和是sn

sn=6+66+666+...+66..66(n6)

假设你已经知道了数字n,那么,你能帮叶某人求出sn么?

输入

输入一个数nn不会超过10

输出

输出Sn的值

样例输入

2

样例输出

72

提示

--
这道题我用的方法是:首先用一个循环,然后把所有的6加上,再把所有的60加上……以此类推
简单的模拟~写了4分钟,一次搞定(OJ)不编译
var ans,n,i,j,bb:longint;
begin
readln(n);
 for i:=1 to n do
 begin
 bb:=1;
 for j:=1 to i do
 bb:=bb*10;
  ans:=ans+(n-i+1)*6*(bb div 10);
 end;
writeln(ans);
end.

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值