47 条题解
-
2
zone LV 10 @ 2017-10-13 20:20:16
#include <queue> #include <cstdio> #include <cstring> #include <iostream> #include <algorithm> using namespace std; const int N = 110000; string a,b,s,ss[10000]; int main() { cin>>a;cout<<a<<" "; if(a[0] == 'W') { cin >> a>>b; while(cin>>s) { if(s[s.size()-1] == '!' || s[s.size()-1] == '.') { s[s.size()-1] = ' '; cout<<s; break; } cout<<s<<" "; } if(a[0]>='A'&&a[0]<='Z')a[0] -= ('A'-'a'); cout<<a<<" "<<b<<"!"; } else { int t = 1; while(cin>>ss[t]) t++; t--; ss[t][ss[t].size()-1] = ' '; cout<<ss[t]; if(ss[1][0]>='A'&&ss[1][0]<='Z')ss[1][0] -= ('A'-'a'); for (int i = 1; i < t-1; i++) cout<<ss[i]<<" "; cout<<ss[t-1]<<"!"; } return 0; } -
1
violethill LV 10 @ 2009-10-09 08:10:29
鄙人英语不好 看到这样的题目直接pass
反正noip也不可能考 -
0
yejialiang LV 7 @ 2012-11-07 16:54:36
18搞什么,自己英文不好还出这种题!
题目不但没有考虑英语博大精深的语法,还语言凌乱^
做这题简直浪费时间!!!!!! -
0
SecretAgent LV 10 @ 2009-10-14 12:51:31
找‘ is ’(4个字符)然后把前面的部分转到后面；
再在前面接上引导词编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：0ms -
0
zhouliecheng LV 10 @ 2009-10-06 08:55:59
1st:输入用string....51
2nd:length打成lentgh....0
3th:';'没加.....0
4th...5th...
6th.....AC
就这么交了6次...... -
0
晕，还有181818181818，Chinese作主语，结果输出china WA了，一共WA了5次
连错带蒙才AC......此题太坑人，输出结果根本不符合英语语法编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：0msvar s,w:ansistring;
a:array[1..1000] of ansistring;
maxa,wherea,p:integer;procedure cut;
begin
while s'' do
begin
maxa:=maxa+1;
if pos(' ',s)0 then
a[maxa]:=copy(s,1,pos(' ',s)-1)
else
begin
a[maxa]:=s;
s:='';
end;
if (a[maxa]='a')or(a[maxa]='an') then wherea:=maxa;
for p:=1 to length(a[maxa]) do
if (a[maxa][p]='!')or(a[maxa][p]='.') then begin delete(a[maxa],length(a[maxa]),255); break; end
else if (ord(a[maxa][p])64)and(a[maxa][p]'C') then a[maxa][p]:=chr(ord(a[maxa][p])+32);
delete(s,1,pos(' ',s));
end;
end;begin
readln(w);
readln(s);
maxa:=0;
wherea:=0;
cut;
if w='What' then
{ begin }
write('What '){; }
else write('How ');
if wherea0 then
begin
write(a[wherea],' ');
for p:=wherea+1 to maxa do
write(a[p],' ');
for p:=1 to wherea-1 do
begin
write(a[p]);
if pwherea-1 then write(' ');
end;
write('!');
end
else
begin
for p:=1 to maxa do
if (a[p]='is')or(a[p]='are') then
begin
wherea:=p;
break;
end;
for p:=wherea+1 to maxa do
write(a[p],' ');
for p:=1 to wherea do
if pwherea then write(a[p],' ')
else write(a[p],'!');
end; {
end
else
begin
write('How ');
if wherea0 then
begin
write(a[wherea+1],' a ');
for p:=wherea+2 to maxa do
write(a[p],' ');
for p:=1 to wherea-2 do
if pwherea-1 then write(a[p],' ');
write(a[wherea-1],'!');
end
else
begin
for p:=1 to maxa do
if (a[p]='is')or(a[p]='are') then
begin
wherea:=p;
break;
end;
for p:=wherea+1 to maxa do
write(a[p],' ');
for p:=1 to wherea-1 do
write(a[p],' ');
write(a[wherea],'!');
end;
end};
end. -
0
program Vijos_P1368;
var
a,b:ansistring;
t:longint;
begin
readln(a);
readln(b);
b[length(b)]:=' ';
t:=pos(' is ',b)+2;
write(a,copy(b,t+1,length(b)-t));
if b[1]='I' then b[1]:='i';
if b[1]='Q' then b[1]:='1';
if b[1]='T' then b[1]:='t';
writeln(copy(b,1,t),'!');
end.出题的英语没学好吧……
-
0
guori12321 LV 8 @ 2009-06-28 14:38:54
编译通过...
├ 测试数据 01：答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案错误... ├ 标准行输出
├ 错误行输出
├ 测试数据 05：答案错误... ├ 标准行输出
├ 错误行输出
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分：2 有效耗时：0msRP太低了。。。主语不一定是it...
zone
LV 10
@ 2017-10-13 20:20:16
信息
- ID
- 1368
- 难度
- 5
- 分类
- 模拟 点击显示
- 标签
- 递交数
- 862
- 已通过
- 283
- 通过率
- 33%
- 被复制
- 4
- 上传者
-
181818181818
