社区讨论

1200题解

封封禁用户
P1200[USACO1.1] 你的飞碟在这儿 Your Ride Is Here参与者 5已保存回复 4

讨论操作

快速查看讨论及其快照的属性，并进行相关操作。

当前回复
4 条
当前快照
1 份
快照标识符
@mi4eg09h
此快照首次捕获于
2025/11/18 17:56
4 个月前
此快照最后确认于
2025/11/18 17:56
4 个月前
查看原帖
CPP
var
 st1,st2:ansistring;
 x,y,i:longint;
begin 
 readln(st1);
 readln(st2);x:=1;y:=1;
 for i:=1 to length(st1) do 
  x:=x*(ord(st1[i])-64) mod 47;
 for i:=1 to length(st2) do 
  y:=y*(ord(st2[i])-64) mod 47;
 if x=y then write('GO') else write('STAY');
end.

回复

共 4 条回复，欢迎继续交流。

正在加载回复...