История развития планеты земля показывает что на ней существовали и исчезли несколько цивилизаций.Согласно дошедшей до нас информации, в 1 из этих цивилизаций информационный объем одного символа составлял 6 бит. Определите количество символов алфавита потерянной цивилизации. Оформить краткую запись и решение

#include <iostream>
/*Библиотека стандартного ввода-вывода C++ */                     
#include <string>
/*строки*/
#include <cstdio>
//Библиотека стандартного ввода-вывода C*/

using namespace std;

int main()
{
    short int maxDigit = -1;
    string str;
    printf("%s","Введите строку: ");
    cin >> str;                         
    /*Ввод строки*/
    for(int i = 0; str[i] != '\0'; i++)
    /*Цикл от начала строки до ее конца*/   
    /*('\0' - "нуль-терминатор" это символ конца строки)*/                            
    {                                         
        if((isdigit(str[i])) && (short int)(str[i]-48)>maxDigit)
        /*Если текуший символ цифра и она больше maxDigit)*/
        /*"(short int)...-48" преобразует char в short int*/           
        maxDigit = (short int)(str[i]-48);
        /*То maxDigit = этой цифре.*/  
    }   
    if(maxDigit == -1)  cout << "В строке нет цифр: " <<  "\n";   
    cout << "Наибольшая цифра: " << maxDigit << "\n";   
    /*Вывод */
    system("pause");
    return 0;
}

Type 
mas = array[1..11] of integer;

procedure p(a: mas; k: integer);
var  t: integer;
begin 
if a[k] <> 0 then 
begin   
t := a[k];   
if a[k] < 0 then writeln(a[k]);   
p(a, k + 1); 
end 
else t := -1; 
if t > 0 then writeln(t);
end;

var 
n, i: integer; 
a: mas;

begin 
randomize; 
write('Размер последовательности от 2 до 10 n= '); 
readln(n); 
writeln('Последовательность'); 
for i := 1 to n do 
begin   
repeat     
a[i] := -10 + random(21);   
until a[i] <> 0;   
write(a[i]:4); 
end; 
writeln; 
a[n + 1] := 0; 
writeln('Преобразованная последовательность'); 
p(a, 1);
end.