Блок-схема Опции

[Guest]

Привет всем.

Задали нарисовать блок-схему по задаче, задача такая

Любую сумму денег больше 7 рублей можно разменять на 3 и 5 рублей
Разменяйте N рублей всевозможными способами.

[klem4]

Мне кажется перебор это очень долго .... у меня вот есть другая мысль, работает вроде правильно, только запарка с числом 9 ну этот случай можно и отдельно рассмотреть. А так в случае с перебором, это в любом случае

(n div 3 +1)*(n div 5 + 1) операций, тоесть в случае например с n=1000 это будет 334*201 = 67134

в моем случае n div 5 -> 200 Если я не прав или ошибаюсь, извиняюсь.

uses crt;

var
   n, c5 : integer;

Begin

   clrscr;

   write('n='); readln(n);

   c5 := 0;

   while(n>0) do begin
      dec(n, 5);
      inc(c5);
      if n mod 3 = 0 then
       writeln('5*', c5, ' + 3*', n div 3);
   end;
   readln;

end.