Const n=10;var a:array [1..n] of integer;i,max:integer;beginrandomize;for i:=1 to n dobegina[i]:=random(100);writeln(a[i]);end;max:=0;for i:=1 to n dobeginif a[i]>max then beginmax:=a[i];end;end;writeln('Max = ',max);end.
если сильно надо считывать первое число (длину строки), то поменяй string на массив char
<span>271113</span>₈=2.7.1.1.1.3₈=10.111.001.001.001.011₂=10111001001001011₂
Каждую цифру восьмеричного числа записываем в двоичную триаду (3 позиции)
И означает умножение
или означает сложение(но 1+1=1)
значит:
1. 0
2. 0
3. 0
4. 0
5. 0
6. 0
7. 1
8. 1
9. 1
10. 1
11. 1
12. 1
13. 1
14. 1
15. 1
16. 1
(сначала надо сделать b и c, потом a и (b*c), дальше d и (b*c), в конце (a+(b*c)) и (d*(c*b))
Опять частотный словарь, Эту задачу уже решали. Решение на Питоне. На скрине и в текстовом файле.