有一本小册子，中间撕去一页后，剩下的各页码之和为90，求(1)这本小册子共有多少页？(2)撕下的那页的两个页码是几？
要求：
1、输出结果为三个数，总页数、撕下那页的两个页码数。
2、输出结果到文件。
答案：7 7 8
希望可以给出程序！
一个PASCOL编程问题
答案:1 悬赏:40 手机版
解决时间 2021-08-01 14:55
- 提问者网友：却不属于对方
- 2021-07-31 18:08
最佳答案
- 五星知识达人网友：掌灯师
- 2021-07-31 19:27
program d;
var a,b,t:integer;
begin
t:=0;
for a:=1 to 14 do t:=t+a;
for b:=1 to 7 do
if (2*b-1)+(2*b)=t-90
then writeln(7,' ',2*b-1,' ',2*b);
readln;
end.
var a,b,t:integer;
begin
t:=0;
for a:=1 to 14 do t:=t+a;
for b:=1 to 7 do
if (2*b-1)+(2*b)=t-90
then writeln(7,' ',2*b-1,' ',2*b);
readln;
end.
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯