Форум Всеукраїнської інтернет-олімпіади NetOI


На форумі обговорюються лише питання, пов'язані з олімпіадою

Ви не зайшли.

#1 2020-11-11 15:29:00

GeniusDP
Олімпієць
Зареєстрований: 2020-10-15
Повідомлень: 18

Решение Задачи Coins2019

Код:

program coins2019;
{
   Complexity: O(n);
}
var
   n, j, i, k: longint;
   d: array[1..3, 0..100000] of longint;
   
begin
   read(n);
   {
   for i:=1 to 3 do
      for j:=0 to n do
         d[i,j]:=0;
   }
   
   for j:=0 to n do
      d[1,j]:=1;
   d[2,0]:=1; d[3,0]:=1;
   d[2,1]:=1;
   for j:=2 to n do
      d[2,j]:=d[1,j]+d[2,j-2];
   for j:=1 to 4 do
      d[3,j]:=d[2,j];
   for j:=5 to n do
      d[3,j]:=d[2,j]+d[3,j-5];
   
   write(d[3,n]);
end.

Поза форумом

 

Нижній колонтитул

Powered by Likt
© Copyright 2002–2009 Likt