Во время каникул в Санкт-Петербурге Арина посетила выставку художников-импрессионистов. Для полноты восприятия она взяла аудиогид, чтобы не просто рассматривать картины, но и узнавать что-то новое. Выставка представляет собой галерею из n картин, развешанных (по порядку, от первой к n -й) на одной стене музея. Арина хотела один раз пройтись по галерее, от картины с номером 1 1 до картины с номером n , но в её планы вмешались другие любители живописи, стоявшие у некоторых картин. Поэтому, если у картины уже стоял посетитель, Арина пропускала её и шла дальше. Дойдя до конца галереи, она развернулась и продолжила осмотр, пользуясь той же тактикой относительно остальных посетителей, но в этот раз останавливаться только у ещё не просмотренных картин. Таким образом ей пришлось несколько раз пройти от одного конца галереи до другого. Посмотрев последнюю картину Арина продолжила движение в том же направлении и вышла из музея. После культурной прогулки Арина решила посчитать сколько же раз она по галерее. На её удачу в памяти аудиогида сохранилась последовательность треков с номерами картин Арине — по последовательности номеров картин определите, какое минимальное количество раз она вдоль галереи. Входные данные В первой строке содержится целое число n (1≤≤105) ( 1 ≤ n ≤ 10 5 ) — количество картин в галерее. Во второй строке содержится n целых чисел a i (1≤≤) ( 1 ≤ a i ≤ n ) — номера картин в порядке их просмотра по истории аудиогида. Гарантируется, что ≠ a i ≠ a j , если ≠ i ≠ j . Выходные данные Выведите единственное целое число — минимально возможное количество раз, которое Арина вдоль галереи решить ,
(см. объяснение)
Объяснение:
В прикрепленных файлах приведено решение на python и pascal.
ответом будет число 16.
Задание выполнено!
Скопировать код:
##
function F(n: integer): integer;
begin
if(n<=18) then F:= n+3
else if((n>18) and (n mod 3 = 0)) then F:= (n div 3)*F(n div 3)+n-12
else if((n>18) and (n mod 3 >0)) then F:= F(n-1)+n*n+5;
end;
var k: integer := 0;
for var i: integer := 1 to 800 do
begin
var t: integer := 1;
foreach var c: char in F(i).ToString do
if(Integer.Parse(c) mod 2 > 0) then
begin
t:= 0;
break;
end;
if(t=1) then k:= k+1;
end;
print(k);
def f(n):
if n <= 18:
return n + 3
elif n > 18 and n % 3 == 0:
return (n // 3) * f(n // 3) + n - 12
elif n > 18 and n % 3 > 0:
return f(n - 1) + n * n + 5
k = 0
for p in range(1, 801):
e = 1
for s in str(f(p)):
if int(s) % 2 > 0:
e = 0
break
if e == 1:
k += 1
print(k)
Программа:
def F(n):
if n <= 18:
return n + 3
elif n > 18 and n % 3 == 0:
return (n // 3) * F(n // 3) + n - 12
else:
return F(n - 1) + n * n + 5
k = 0
for i in range(1, 801):
m = 0 # Обнуляем переменную проверки длины четных цифр в числе
for j in range(len(str(F(i: # Пробежимся по длине числа (От 0 до len('число'))
if int(str(F(i))[j]) % 2 == 0: # Проверяем каждую цифру числа на чётность
m += 1
if m == len(str(F(i))): # Если значение переменной совпадает с длиной числа, то..
k += 1
print(k)
ответ: 16