本文主要是介绍信息学奥林匹克竞赛-小鱼的航程(改进版),希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!
小鱼的航程(改进版)
题目背景
原来的题目太简单,现改进让小鱼周末也休息,请已经做过重做该题。题目描述
有一只小鱼,它上午游泳150公里,下午游泳100公里,晚上和周末都休息(实行双休日),假设从周x(1<=x<=7)开始算起,请问这样过了n天以后,小鱼一共累计游泳了多少公里呢?输入输出格式
输入格式:输入两个整数x,n(表示从周x算起,经过n天,n在long int范围内)。
输出格式:输出一个整数,表示小鱼累计游泳了多少公里。
输入输出样例
输入样例#1:3 10输出样例#1:
2000
var
x,n,i,len:longint;
beginreadln(x,n);for i:=x to x+n-1 dobeginif (i mod 7=6) or (i mod 7=0) thenbegincontinue;end;len:=len+250;end;writeln(len);
end.
这篇关于信息学奥林匹克竞赛-小鱼的航程(改进版)的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!