FREEPASCAL2道题的思路.幼稚的游戏描述Descri-查字典问答网
分类选择

来自刘经华的问题

  FREEPASCAL2道题的思路.幼稚的游戏描述Description一年级的英语课上,老师在黑板上写着一个句子,问你这个句子有多少个单词你不屑于回答这种问题,所以你打算编一个程序来回答.

  FREEPASCAL2道题的思路.

  幼稚的游戏

  描述Description

  一年级的英语课上,

  老师在黑板上写着一个句子,

  问你这个句子有多少个单词

  你不屑于回答这种问题,

  所以你打算编一个程序来回答.

  输入格式InputFormat

  一行,有若干个单词或标点符号.长度小于256

  输出格式OutputFormat

  一行,一个整数表示单词数.

  样例输入SampleInput

  Helloeverybody!VivianSnowisthegreatestalive.

  样例输出SampleOutput

  8

  时间限制TimeLimitation

  1s

  注释Hint

  数据保证单词只出现在第一行

  数据保证不会出现譬如单词间有多个空格等缺心眼的情况

  ------------------------------------------------------------

  幼稚的潜伏

  背景Background

  Unit6,SectionC

  描述Description

  幼儿园的小朋友们一直在研究一个问题——

  如何在一个长长的句子中找到最大的那个整数

  你很不幸的被他们拖住了

  又很不幸的被他们叫去执行这个任务……

  你非常的不爽..!

  因为你觉得这么简单的问题简直侮辱了你的智商..

  所以你决定写一个程序来代劳..

  输入格式InputFormat

  一行,一个句子长度小于256

  输出格式OutputFormat

  一行,最大的那个数

  小于maxlongint

  样例输入SampleInput

  &&12345absddkjie64skjd5lk

  样例输出SampleOutput

  12345

  时间限制TimeLimitation

  1s

  两道FREEPASCAL的题,

  只要思路就可以了具体程序不用

1回答
2019-05-15 09:15
我要回答
请先登录
林丽华

  第一题:

  变量:a:longint;str:string;

  1、读入字符串,用length求出str长度

  2、a赋初值0

  3、检查第一个字符,若为字母,a:=a+1,否则进行以下步骤:

  用for语句对字符串逐个检查,如某字符不为字母且它的下一个字符是字母,则a:=a+1.

  4、输出a

  第二题

  变量:a,b:longint;str1,str2:string;

  1、读入str1并求其长度

  2、a赋为0

  3、再用for语句对str1逐个检查,如果为数字,则将其加到str2中,insert或+都可以.如果不为数字,则进行以下步骤:(1)用val语句把str2中的数字调到b(2)将str2清空(3)比较a、b大小,若a

2019-05-15 09:18:53

最新问答

推荐文章

猜你喜欢

附近的人在看

推荐阅读

拓展阅读

  • 大家都在看
  • 小编推荐
  • 猜你喜欢
  •