计算星期几pascal语言

2007年1月1日是星期一,请问n天后是星期几?Input只有一个正整数:n(1<=n<=10000)Output只有一个数据:n天后是星期几(用英文表示)... 2007年1月1日是星期一,请问n天后是星期几?

Input

只有一个正整数:n
(1<=n<=10000)

Output

只有一个数据:n天后是星期几(用英文表示)
展开
 我来答
fzsdzxccr
2009-05-23 · TA获得超过294个赞
知道小有建树答主
回答量:161
采纳率:0%
帮助的人:0
展开全部
var n:integer;
begin
case n mod 7 of
1:writeln('Tuesday');
2:writeln('Wednesday');
3:writeln('Thursday');
4:writeln('Friday');
5:writeln('Saturday');
6:writeln('Sunday');
else writeln('Monday');
end;
end.
--
2022-12-05 广告
图形化编程简单理解为用积木块形式编程,scratch和python也是其中的一种,属于入门级编程,以其简单生动的画面获得无数学生的喜爱,深圳市创客火科技有限公司是一家做教育无人机的公司,旗下有编程无人机,积木无人机及室内外编队,每款飞机含有... 点击进入详情页
本回答由--提供
Yamacages
2009-05-30 · TA获得超过186个赞
知道答主
回答量:74
采纳率:0%
帮助的人:44.7万
展开全部
var k,n:longint;
begin
read(n);
k:=n mod 7;
case k of
1:writeln('Tuesday');
2:writeln('Wednesday');
3:writeln('Thursday');
4:writeln('Friday');
5:writeln('Saturday');
6:writeln('Sunday');
7: writeln('Monday');
end;
end.
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式