zoukankan      html  css  js  c++  java
  • TyvjBegin P1029 Begin1 Unit6 幼稚的把戏

    描述 Description

    某某国王(不是萨拉克门托..!)有一个神奇的魔镜,,,
    它可以把东西变为原来的两倍..
    (可惜是反的..)
    某日,他感到很无聊,
    于是把皇后的一串珠子变了不知道几次..
    皇后回来之后不是很高兴,,
    她还是喜欢原来那串珠子,,
    现在告诉你改变之后珠子的形状,,
    请你告诉她,原来的珠子是什么样子的..

    输入格式 Input Format

    一行,一串字符,表示现在的珠串
    长度小于100

    输出格式 Output Format

    一行,原来的珠串

    样例输入 Sample Input

    1232232112322321

    样例输出 Sample Output

    1232

    时间限制 Time Limitation

    1s

    注释 Hint

    注意 若左右对称则保留左边的一节

     

    字符串题,10分钟内用递归搞定

    var
     s:string;
     n,i:integer;
    function duibi(all:string):boolean;
     var
      len,j:longint;
     begin
      duibi:=true;
      len:=length(all);
      for j := 1 to len do
       if all[j]<>all[len+1-j] then exit(false);
     end;
    procedure dg(x:string);
     var
      snew:string;
      l,l2:longint;
     begin
      l := length(x);
      l2 := round(l/2);
      if (l2*2 <> l) or (not(duibi(x))) then
       begin
        writeln (x);
        exit;
       end;
      snew := copy (x,1,l2);
      dg(snew);
     end;
    begin
     readln (s);
     dg(s);
    end.
  • 相关阅读:
    sql server 中having 的使用注意事项
    js截取字符串
    .net截取字符串
    序列化二叉树
    把二叉树打印成多行
    35 拷贝赋值函数、虚函数
    34 char类型转换为int类型
    33 单/双精度有效数字、程序运行过程
    32 C++常见错误集锦
    31 位域、空类的sizeof值
  • 原文地址:https://www.cnblogs.com/yachen/p/1890231.html
Copyright © 2011-2022 走看看