Расширение первого файла третьей буквой может иметь только символ С, а во втором случае абсолютно любой и необязательно один. Поэтому нельзя сказать, что приведенные записи одинаковые и найдут одинаковые файлы
В вашу исходную программу, после Task('cif2'); надо добавить следующие строки, задающие алгоритм действий для робота:
while FreeFromRight do
begin
Right;
if WallFromUp then Paint;
if WallFromDown then Paint;
end;
Или, можно ещё немного сократить, объединив два условия в одном if (если вы уже проходили логические операторы OR):
while FreeFromRight do
begin
Right;
if WallFromUp or WallFromDown then Paint;
end;
Var
a, b, c, d, e: real;
function min(a, b, c: real): real;
begin
if(b < a) and (b < c) then min := b;
if(c < a) and (c < b) then min := c;
if(a < b) and (a < c) then min := a;
end;
begin
read(a, b, c, d, e);
write(min(min(a, b, c), d, e));
end.
def bracket(a):
test_list = []
for i in a:
if i == "(" or i == ")":
test_list.append(i)
opening_bracket= test_list.count("(")
closing_bracket = test_list.count(')')
if opening_bracket != closing_bracket:
print("Неправильные количество скобок!\t'(' = {} ')' = {}".format(
opening_bracket,closing_bracket
))
else:print('Количество открывающих скобок, равно количеству закрывающих скобок')
text = '( текст для тестирования ( программы и ) для обработки ( данных) '
bracket(text)
text_1 = "(((((((((((((()))()()()()())())()(())()))()()()()())))("
bracket(text_1)
text_2 = "(((((((((((((((((())))))))))))))))))"
bracket(text_2)
Вивод:
Неправильные количество скобок! '(' = 3 ')' = 2
Неправильные количество скобок! '(' = 30 ')' = 25
Количество открывающих скобок, равно количеству закрывающих скобок