мне Записать блок программы, с которого записываются данные с Pascal в текстовый файл. 2. Ввести с клавиатуры слово и посчитать в нем количество букв "в" и "т". Поиск количества записать в виде функции. 3. Построить равнобедренный треугольник графическими средствами Pascal, закрасить его в желтый цвет.
Код на python 3:
from queue import Queue
to_process = Queue()
to_process.put(("edghcbfa", None))
prec = {}
while not to_process.empty():
s, prev = to_process.get()
if s in prec:
continue
for i in range(7):
for j in range(i + 1, 8):
if i == 0:
next_s = s[j::-1] + s[j+1:]
else:
next_s = s[:i] + s[j:i-1:-1] + s[j+1:]
if next_s not in prec:
to_process.put((next_s, s))
prec[s] = prev
current = "abcdefgh"
print(current)
while prec[current] is not None:
current = prec[current]
print(current)
Вывод программы:
abcdefgh
edcbafgh
edcbhgfa
edbchgfa
edghcbfa
Соответственно, ответ такой:
G B
B C
H A
E A