Автор | Сообщение |
|
Отправлено: 07.01.21 14:07. Заголовок: ЕГЭ 16 № 65
65) Алгоритм вычисления функции F(n) задан следующими соотношениями: F(n) = n + 15, при n <= 5 F(n) = F(n // 2) + n · n · n – 1, при чётных n > 5 F(n) = F(n–1) + 2 · n · n + 1, при нечётных n > 5 Здесь «//» обозначает деление нацело. Определите количество натуральных значений n из отрезка [1; 1000], для которых значения F(n) содержит не менее двух цифр 8. Здравствуйте, получается 186, а в ответах 164 var k,i,a,q:integer; Function F (n:integer):integer; begin if (n<=5) then F:=n+15; if (n mod 2 = 0) and (n>5)then F:=(n div 2)+n*n*n-1; if (n mod 2 <> 0) and (n>5)then F:=F(n-1)+2*n*n+1; end; begin k:=0; for i:=1 to 1000 do begin a:=abs(F(i)); q:=0; while a>0 do begin if a mod 10=8 then inc(q); a:=a div 10 end; if q>=2 then inc(k); end; writeln(k); end.
|
|
|
Ответов - 3
[только новые]
|
|
|
| Администратор
|
Сообщение: 2286
|
|
Отправлено: 07.01.21 20:43. Заголовок: sch12smirnova пишет:..
sch12smirnova пишет: цитата: | if (n mod 2 = 0) and (n>5)then F:=F(n div 2)+n*n*n-1; |
|
|
|
|
|
Отправлено: 08.01.21 11:03. Заголовок: Спасибо :sm12:..
Спасибо
|
|
|
|
Отправлено: 08.01.21 17:50. Заголовок: здравствуйте, а можн..
здравствуйте, а можно организовать поиск восьмерок в числах в Ecxel?
|
|
|
|