Написать функцию, которая получает путь до файла и счетает в нем количество повторений букв функция должна вернуть словарь с буквами и кол-вом повторений
Привет. Писал и думал надо кодом около получаса. Вот что настрочил. Работает не идеально, просто нету времени дорабатывать. Надеюсь код тебе чем-то тебе .
1. var a: array [1..11] of integer; i, min, imin: integer; begin for i:=1 to 10 do read(a[i]); min:=32000;imin:=0; for i:=1 to 10 do if (a[i] mod 2) = 0 then if a[i]<min then begin min:=a[i]; imin:=i; end; write('Минимальное:', min, ' Индекс:', imin); end.
2. function stepen(c, s: integer):integer; var j, rez: integer; begin rez:=c; for j:=1 to (s-1) do rez:=rez*c; stepen:=rez; end; var a: array [1..11] of integer; i, min, imin: integer; begin for i:=1 to 10 do a[i]:=stepen(2, i); for i:=1 to 10 do write(a[i], ' '); end.
Если возникли вопросы или ошибки в ходе работы программы, пиши в комментариях.
var simple: List<integer> := new List<integer>; i, n, p: integer; m: longint;
begin read(n); for i := 2 to n do begin m := 1; foreach s: integer in simple do m := m * i mod s; if m > 0 then begin simple.Add(i); // write(i, ' '); end; end; writeln();
foreach s: integer in simple do begin if Math.Pow(2, s) - 1 <= longint.MaxValue then begin m := round(Math.Pow(2, s) - 1); if (m <= n) and simple.Contains(m) then write(m, ' '); end; end; end.
Привет. Писал и думал надо кодом около получаса. Вот что настрочил. Работает не идеально, просто нету времени дорабатывать. Надеюсь код тебе чем-то тебе .
import os
f=open("file.txt", "r")
line=f.readline()
name=line.strip()
dupl_li={}
def finder():
for name in f:
if name in dupl_li:
dupl_li[name]+=1
else:
dupl_li[name]=1
finder()
for name in dupl_li:
if dupl_li[name]>1:
print(name)
f.close()
Объяснение: