Форум: «ЕГЭ по информатике»

На этом форуме отвечают на конкретные вопросы. Фраза «я не понимаю, как решать» — это не вопрос. На вопрос «как решить задачу №X» вас отошлют к материалам сайта kpolyakov.spb.ru. За бессвязный поток слов и неспособность формулировать свои мысли — бан.

Если у вас не сходится ответ на какую-то задачу, пожалуйста сразу представляйте свое «правильное» решение.

Программы "заворачивайте" в тэг [pre2]...[/pre2], при этом сохраняются все отступы и применяется моноширинный шрифт. Если у вас используется сочетание "[i]" для обозначения элемента массива или строки, ставьте пробел после открывающей скобки. Иначе система выделит все дальнейшее курсивом.

Для регистрации на форуме щелкните по ссылке «Вход-регистрация» вверху страницы. В открывшееся окошко «ник» введите свою фамилию на русском языке (например, Иванов). В окошко «пароль» введите придуманный вами пароль, состоящий из латинских букв и цифр. Поставьте галочку в окошке «зарегистрироваться, я новый участник» и нажмите кнопку «ОК».

var
count,n,k,x:integer;
Function F(n:integer):integer;
begin
if n <=15 then begin

result:=n*n+3*n+9;
exit;

end;
if (n > 15) and (n mod 3=0) then
result:=F(n-1)+n-2 else
result:=F(n-2)+n+2
end;
begin
count:=0;

for n:=1 to 1000 do
k:=0;
x:=F(n);
while x>0 do begin
k:=k + x mod 10;
x:=x div 10;
if k mod 2=0 then begin
count:=count+1;
end;
end;
writeln(count);
end.

def F(n):
if n <= 15:
return n**2 + 3*n + 9
elif n > 15 and n%3 == 0:
return F(n-1) + n - 2
elif n > 15 and n%3 != 0:
return F(n-2) + n + 2

count = 0
for i in range(1,1000+1):
s = str(F(i))
k = 0
for x in s:
if int(x)%2 == 0:
k +=1
if k == len(s): count +=1

print(count)

var
count, n, k, x: integer;

function F(n: integer): integer;
begin
if n <= 15 then
result := n * n + 3 * n + 9
else
if (n mod 3 = 0) then
result := F(n - 1) + n - 2
else
result := F(n - 2) + n + 2
end;

begin
count := 0;
for n := 1 to 1000 do
begin
x := F(n);
k := 1;
while x > 0 do
begin
if x mod 2 <> 0 then
begin
k := 0;
break;
end;
x := x div 10;
end;
if k = 1 then
count += 1
end;
print(count)
end.