摘要: procedure TForm1.Button1Click(Sender: TObject); var queue:TQueue; i:integer; s:string; begin queue.head:=1; queue.tail:=1; for i:=1 to 9 do begin queu 阅读全文
posted @ 2023-03-17 14:39 朱颂东 阅读(10) 评论(0) 推荐(0) 编辑
摘要: 新学期开始了,小哈是小哼的新同桌(小哈是个小美女哦~),小哼向小哈询问 QQ号,小哈当然不会直接告诉小哼啦,原因嘛你懂的。所以小哈给了小哼一串加密过的数字,同时小哈也告诉了小哼解密规则。规则是这样的:首先将第 1个数删除,紧接着将第 2 个数放到这串数的末尾,再将第 3 个数删除并将第 4 个数放到 阅读全文
posted @ 2023-03-17 10:41 朱颂东 阅读(30) 评论(0) 推荐(0) 编辑