Паскаль. блок схема : вычисление массовой доли элемента в веществе.информатика . .

На Питоне:

path = 'F:/file.txt'

with open(path, 'r', encoding='utf-8') as f:

   data = f.read()

   f.close

a = [0 for i in range(10)]

for char in data:

   if char == '0': a[0]+=1

   elif char == '1': a[1]+=1

   elif char == '2': a[2]+=1

   elif char == '3': a[3]+=1

   elif char == '4': a[4]+=1

   elif char == '5': a[5]+=1

   elif char == '6': a[6]+=1

   elif char == '7': a[7]+=1

   elif char == '8': a[8]+=1

   elif char == '9': a[9]+=1

print(a)

digit = max(a)

if digit > 0:

   print(f'Самая часто встречающаяся цифра в файле {a.index(digit)}. Она встречается {digit} раз.')

else:

   print('В файле нет цифр.')

Объяснение:

Для начала переведем в десятичную 7*1+2*9+1*81=106. Перенесем 24 вправо 106-24=82. Число = Нужно 82 перевести в другую систему, вопрос в какую. Честно говоря взял наугад 7 (основание должно быть явно  меньше 10 и даже 9). Делим нацело 82/7=11 + 5 остаток (это будет младший разряд) теперь делим 11/7=1+4 (остаток будет второй цифрой) и единичка (на 7 больше не делится) будет самым старшим разрядом.

Теперь, как я понял, нужно перевести в троичную (если другое число, не 82, то переведите по примеру). 82/3=27+1(остаток, младший разряд), 27/3=9+0(0 это следующий разряд), 9/3=3+0 (0 это третий разряд), 3/3=1+0 (0 это четвертый разряд), и осталась единичка, которая на 3 не делится (нет целой части от деления). Это будет самый старший разряд. Получили.