Исполнитель Вычислитель получает на вход целое число и может выполнять над ним следующие действия: 1. Прибавь 1 прибавляет к числу на экране 1
2. Умножь на 2 - увеличивает число на экране в 2 раза
3. Умножь на 3 -Увеличивает число на экране в 3 раза

За какое минимальное количество действий исполнитель Вычислитель может получить из числа число ?

program xxx;

  var i, j, k, min : integer;

              a: array[1..10, 1..20] of integer;

              b: array[1..10] of integer;

begin

    for i: =1 to 10 do

        for j: =1 to 20 do

              readln(a[i,j]);

    for i: =1 to 10 do

      begin

        b[i]: =0;

        for j: =1 to 20 do

            b[i]: =b[i]+a[i,j];

      end;

    min: =b[1]; k: =1;

    for i: =2 to 10 do

        if b[i]< min then begin max: =b[i]; k: =i end;

    writeln('наименьшая сумма элементов =', min);

    writeln('она находится в строке -', k);

    readln

end.

var

s,s1: real;

k: integer;

begin

s: =10;

k: =1;

while s< 20 do

begin

s: =s*1.1;

k: =k+1;

end;

writeln('в ', k,' день он пробежит 20 км');

s: =10;

s1: =10;

k: =1;

while s< 200 do

begin

s: =s+s1*1.1;

s1: =s1*1.1;

k: =k+1;

end;

writeln('в ', k,' день суммарный пробег превысит 200 км');

end.

1)7-5=2 уч.-имеют две "3" по и по . 2)17-4-5-2=6 уч.-имеют две "3" по и по . 3)22-5-2-11=4 уч.-имеют две "3" по и по . 4)40-22-4-6-4=4 уч.-учатся без "3". 5)6+2+4=12 уч.-имеют "3" по двум предметам из трёх.

чтобы потушить 8 нужно 1600 литров воды.желательно тушить по часовой