Задача 2. Вкладник хоче покласти на депозит у банку х грн на к років. Банк пропонує три види депозитів:
• під 20% прибутку за рік, але прибуток не додається до вкладу і його можна забрати по закінченню терміну депозиту;
• під 18% прибутку за рік, і цей прибуток через кожний рік додається до вкладу;
• під 16% прибутку за рік, і цей прибуток кожного місяця додається до вкладу.
Створіть математичну модель і проєкт для визначення, який з видів депозиту йому вибрати, щоб отримати максимальний прибуток.

program xxx;

    var z,d,k : integer;

begin

  z: =2; d: =7; k: =0;

  while (d> =z) do

    begin

      d: =d-z;

        k: =k+1

      end;

  writeln(d,'    ',k);

  readln

end.

var a: integer; c1, c2, c3, c4: integer;

begin for a : = 1000 to 9999 do begin c1 : = a div 1000; c2 : = (a div 100) mod 10; c3 : = (a div 10) mod 10; c4 : = a mod 10; if (c1 < > c2) and (c1 < > c3) and (c1 < > c4) and (c2 < > c3) and (c2 < > c4) and (c3 < > c4) then writeln(a); end; end.

1 кбайт

1000 байт

1024 бит

1 байт

1 бит