pascal 程序 读入一个句子,单词之间用空格隔开 输出最长的单词,并输出这个单词的长度(使用字符串)

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/23 19:16:28
pascal程序读入一个句子,单词之间用空格隔开输出最长的单词,并输出这个单词的长度(使用字符串)pascal程序读入一个句子,单词之间用空格隔开输出最长的单词,并输出这个单词的长度(使用字符串)pa

pascal 程序 读入一个句子,单词之间用空格隔开 输出最长的单词,并输出这个单词的长度(使用字符串)
pascal 程序 读入一个句子,单词之间用空格隔开 输出最长的单词,并输出这个单词的长度
(使用字符串)

pascal 程序 读入一个句子,单词之间用空格隔开 输出最长的单词,并输出这个单词的长度(使用字符串)
var
s:string;
i,j,m1,m2:integer;
begin
readln(s);
m2:=0;
m1:=0;
for i:=1 to length(s) do
begin
if s[i]=' ' then
begin
for j:=i to length(s) do
if s[j]=' ' then
begin
if (j-i)>(m2-m1) then
begin
m1:=i;
m2:=j;
end;
end;
end;
end;
for i:=m1+1 to m2-1 do
write(s[i]);
write(' ',m2-m1-1);
end.

pascal 程序 读入一个句子,单词之间用空格隔开 输出最长的单词,并输出这个单词的长度(使用字符串) pascal打印数字图形读入一个整数n(n 用PASCAL做!读入一英文句子,单词之间用空格或逗号隔开,统计其中单词个数,并输出各个字母出现的频率.读入一英文句子,单词之间用空格或逗号隔开,统计其中单词个数(末尾不一定用.结束) 如 用pascal 语言编写一个程序读入一系列字符,将它们分别放在英文字母、数字、其他符号三个集合中编写一个程序读入一系列字符,将它们分别放在英文字母、数字、其他符号三个集合中,统计出 该程序的功能是:读入一个整数(2 pascal 单词统计单词统计(word count.pas)Time Limit:1000MS Memory Limit:65536KTotal Submit:52 Accepted:14Description【问题描述】 读入一英文句子,单词之间用空格或逗号隔开,统计其中单词个数,并输出各个字母出 读入n个数,求第偶数个数的总和,及求出第奇数个数总和的平均数(四舍五入,保留两位小数).求一pascal程序 求一个背包程序(PASCAL)最原始的 产生数pascal程序给出一个整数n(n Miller-Rabbin素数测试法求一个用Miller-Rabbin算法判断是否为素数的程序,注意要用PascalPascal!Pascal!Pascal!Pascal!Pascal!Pascal!Pascal!Pascal!最好有说明 FREE PASCAL 2道题的思路.幼稚的游戏 描述 Description 一年级的英语课上,老师在黑板上写着一个句子,问你这个句子有多少个单词你不屑于回答这种问题,所以你打算编一个程序来回答. 谁帮忙解读一下这个pascal程序多项式 ( Polynomial )(poly.pas/in/out)一个 n (1≤ n≤ 100) 次整系数多项式x^n+a1*x(n-1)+……+an*x^0 ,已知它的 n 个非正整数根,求方程的系数.输入格式:从文件POLY.IN读入数 c语言:编写一个程序找出一组单词中的“最小“和“最大“的单词(单词在字典中的先后顺序,字典中先出现的小).当输入四个字母单词时,程序停止读入.我这里已经写好了,有一个小问题,就 几道关于pascal的题目题目分别如下:1.用字符输出一个“王”字.2.从键盘上读入小写的pascal,利用CHR()和ORD()函数,输出大写的PASCAL.3. 从键盘上读入一个实数,利用ROUND()和TRUNC()函 【C语言】下面程序的功能是:读入一个整数m,计算如下公式的值:下面程序的功能是:读入一个整数m,计算如下公式的值:我的程序哪里错了. 写一个程序,使用for语句,计算从键盘读入的一个整 数序列的和.其中读入的第一个数,表示该整数序列1. 写一个程序,使用for语句,计算从键盘读入的一个整数序列的和.其中读入的第一个数,表示 单词连接 (link.pas/c/cpp)pascal语言的问题,求pascal程序详细内容单词连接(link.pas/c/cpp)内存限制:32MB 时间限制:1秒输入文件中包含两行,每行一个单词,共两个单词,现在将它们进行如下连接 pascal语言程序1.读入两个字符,若这两个字符的ASCII码之差是奇数,打印两个字符的后继字符,否则打印它们的前趋字符.S=2+4+6+………+100; S=1!+2!+3!+……+10!(3!=3*2*1,用longint)2.