社区讨论
槽点很多,见笑了。
P1597语句解析参与者 2已保存回复 1
讨论操作
快速查看讨论及其快照的属性,并进行相关操作。
- 当前回复
- 1 条
- 当前快照
- 1 份
- 快照标识符
- @mi4eg7ys
- 此快照首次捕获于
- 2025/11/18 17:57 4 个月前
- 此快照最后确认于
- 2025/11/18 17:57 4 个月前
CPP
var
a,s1,s2,s3:string;
t,i,b,c:longint;
begin
read(a);
t:=length(a);
i:=4;
repeat
s1:=s1+copy(a,i,1);
i:=i+1;
until a[i]=';';
repeat
s2:=s2+copy(a,4+i+b,1);
b:=b+1;
until a[4+i+b]=';';
repeat
s3:=s3+copy(a,4+i+i+c,1);
c:=c+1;
until a[4+i+i+c]=';';
write(s1,' ',s2,' ',s3);
end.
回复
共 1 条回复,欢迎继续交流。
正在加载回复...