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.
ОКЕАН МОРЕ РЕКА
Тихий океан. Азовское Волга
Индийский Черное Дон
Помой полы
1) убери все вещи с пола,
2) отряхни коврики
3) подмети пол
4) вымой пол
5) мой от угла к выходу
6) помой тряпку под струей воды
7) положи все на место
Это первая часть. Надеюст разберете мой корявый почерк
Ответ:
import itertools
import re
lines = []
with open("input.txt", "r") as f:
line = f.read()
for string in line.split('\n'):
if len(string) > 1:
a = [item for item in re.compile('\d+').findall(string)]
a = len(set(a))
lines.append(a)
with open(r"output.txt", "w") as file:
for line in lines:
file.write(str(line) + '\n')
Объяснение:
Python 3.7