字典翻译 问答 其它 【FreePascal程序设计题速度要1.在1~500中，找出能同时满足用3除余2，用5除余3，用7除余2的所有整数。2.求1~100之间的奇数的和。3.求S=1-2+3-4+5-6+7....+99-100的值。4.试编程找出能被各位数字之和整】
问题标题：
【FreePascal程序设计题速度要1.在1~500中，找出能同时满足用3除余2，用5除余3，用7除余2的所有整数。2.求1~100之间的奇数的和。3.求S=1-2+3-4+5-6+7....+99-100的值。4.试编程找出能被各位数字之和整】
问题描述：

FreePascal程序设计题速度要

1.在1~500中，找出能同时满足用3除余2，用5除余3，用7除余2的所有整数。

2.求1~100之间的奇数的和。

3.求S=1-2+3-4+5-6+7....+99-100的值。

4.试编程找出能被各位数字之和整除的一切两位数。

今天晚上要，以上题目都要用FOR语句做，满意必定加分。

崔玥回答：
　　programdd1;vari,j,s:longint;beginfori:=1to500doif(imod3=2)and(imod5=3)and(imod7=2)thenwrite(i,'');end.-------------------------------------programdd2;vari,j,s:longint;beginfori:=1...
点击显示
其它推荐
热门其它推荐
  • 其它
    •