数据结构之B进制(确定进制)

#include <cstdio>
int max_num(int n)
{
    int max=0;
    while(n)
    {
        int k=n%10;
        if(k>max)
            max=k;
        n/=10;
    }
    return max;
}

int getX_Y(int n,int p)
{
    int k=1,r;
    int sum=0;
    while(n)
    {
        r=n%10;
        n/=10;
        sum+=r*k;
        k*=p;
    }
    return sum;
}

int main()
{
    int t;
    int a,b,c;
    scanf("%d%d%d",&a,&b,&c);
    int amax,bmax;
    amax=max_num(a);
    bmax=max_num(b);
    if(bmax>amax)
        amax=bmax;
    bmax=max_num(c);
    if(bmax>amax)
        amax=bmax;
    int da,db,dc;//10进制的a、b
    for(amax++; amax<=16; amax++)
    {
        da=getX_Y(a,amax);
        db=getX_Y(b,amax);
        dc=getX_Y(c,amax);
        if(da*db==dc)
            break;
    }
    if(amax>16)
        amax=0;
    printf("%d\n",amax);
    return 0;
}


转载于:https://www.cnblogs.com/jasonhaven/p/7355044.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
### 回答1: vb6.0是一种编程语言,对于十六进制和校验算法的实现,可以通过以下方式进行。 1. 十六进制转换: 在vb6.0中,可以使用Hex函数将十进制数转换为十六进制数。例如,将十进制数16转换为十六进制数,可以使用以下代码: hexValue = Hex(16) 在此示例中,hexValue的值将是10。 2. 校验算法: 校验算法用于验证数据的完整性,常用的校验算法包括奇偶校验和循环冗余校验(CRC)。 a. 奇偶校验: 奇偶校验通过计算数据中1的数量来确定校验位。如果数据中的1的数量为偶数,则校验位设置为0;如果数据中的1的数量为奇数,则校验位设置为1。在vb6.0中,可以使用以下代码计算奇偶校验位: Function ParityCheck(Data As String) As Integer Dim count As Integer count = 0 For i = 1 To Len(Data) If Mid(Data, i, 1) = "1" Then count = count + 1 End If Next i If count Mod 2 = 0 Then ParityCheck = 0 Else ParityCheck = 1 End If End Function b. 循环冗余校验(CRC): 循环冗余校验是一种更复杂的校验算法,它通过多项式除法来计算校验位。在vb6.0中,可以使用CRC32Sync控件或自定义函数来实现CRC校验算法。例如,以下是使用CRC32Sync控件计算CRC校验的示例代码: Dim crc As New CRC32Sync Dim data As String data = "Test Data" crc.PutString data crc.Calculate Debug.Print crc.Result 以上代码将计算出字符串"Test Data"的CRC校验值,并通过Debug.Print语句打印出来。 ### 回答2: VB6.0是一种编程语言,也支持十六进制和校验算法的实现。在VB6.0中,十六进制指的是一种数制系统,使用16个数字(0-9以及A-F)表示数字0-15。而校验算法是运用在数据传输或者存储中,目的是检测数据传输中的错误或者完整性。 在VB6.0中,我们可以使用提供的函数和方法来实现十六进制和校验算法。要将十进制转换为十六进制,我们可以使用VB6.0中的Hex函数。例如,将十进制数15转换为十六进制:Hex(15),得到的结果是"F"。 而要计算校验码,可以使用一些常见的校验算法,例如校验和、循环冗余校验(CRC)等。以校验和算法为例,在VB6.0中可以使用循环结构和位运算来实现。 以下是一个示例代码,演示了如何在VB6.0中实现校验和算法: ``` Function CalculateChecksum(data As String) As Byte Dim checksum As Byte Dim i As Integer checksum = 0 For i = 1 To Len(data) checksum = checksum Xor Asc(Mid(data, i, 1)) Next i CalculateChecksum = checksum End Function ``` 这段代码定义了一个名为CalculateChecksum的函数,接受一个字符串参数data,并返回一个字节(Byte)类型的校验和结果。在函数中,我们通过循环遍历字符串的每一个字符,并使用Xor运算符对每个字符的ASCII码进行异或操作,最终得到校验和的值。 通过使用上述的函数和方法,我们可以在VB6.0中实现十六进制和校验算法,用于处理和验证数据。这些算法在数据传输或存储中具有重要的作用,可以帮助我们确保数据的完整性和准确性。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值