pascal输入2条英文句子,找出相同部分……例如：this is a bookis a 输出：is a

来源：学生作业帮助网编辑：作业帮时间：2024/05/01 07:08:20

pascal输入2条英文句子,找出相同部分……例如：this is a bookis a 输出：is a
pascal输入2条英文句子,找出相同部分……
例如：this is a book
is a
输出：is a

pascal输入2条英文句子,找出相同部分……例如：this is a bookis a 输出：is a
var s,z:string;
i,j:longint;
a:array[1..1000] of integer;
begin
readln(s);
readln(z);
fillchar(a,sizeof(a),0);
for i:=1 to length(s) do
begin
for j:=1 to length(z) do
if (s[i]=z[j]) and (a[j]=0)
then begin
write(s[i]);
a[j]:=1;
break;
end;
end;
writeln;
end.
希望我的回答能帮到你.（每次都是我~）

pascal输入2条英文句子,找出相同部分……例如：this is a bookis a 输出：is a pascal输入2条英文句子,找出相同部分……例如：this is a boosthis a输出：this a PASCAL 从键盘上输入一个英文句子,找出里面有几个字母A.要简单一点的,12点后无效…… 用pascal解决问题,从键盘输入一个英文句子,找出有几个字母a（大小写皆可）求输入英文句子单词的平均长度.用pascal语音 PASCAL 输入一个英文句子,将里面每一个单词的首写字母换成大写字母……简单一点……12点无效…… pascal问题,求用string做：求输入一句英文句子,求所有单词的平均长度.要用最最最简洁、简单的做出来,谢谢! pascal 输入n(1 pascal 输入n(1 用pascal语言的一些题目,1,n头奶牛选老大,谁的产量高谁就是老大,请根据各自产量找出老大,报出它的编号.产量值将按编号顺序（1,2,3.）输入.如果两头奶牛产量相同,则编号小的为老大.样例输编写VB程序,在文本框中输入一个简单的英文句子,找出这个句子中最长的单词 pascal练习题输入三角形的三条边长,判断三角形是不是等边三角形输入n个整数,请找出最小数所在的位置,并把它与第一个数对调.(pascal 数组）输入N个整数,请找出最小数所在的位置,并把它与第一个对调pascal pascal 编程输入下列图案 Pascal语言编程问题,找出第k个被3,5,7除的时候,余数为2,3,2的数输入格式一个数k输出格式求出第k个符合条件的数 pascal求打印回文数寻找回文数.我们把形如：121,3223这种正读反读都一样的数据称为回文数,你能编写程序找出N以内的所有回文数么?（N不超出32767)输入：输入一个整数,n样例输入：300输出：1 2 【急】一个C++题目.输入一个英文句子找出其中最长的单词将其显示.单词之间用空格分开.要用到指针啊.