Уисполнителя калькулятор две команды: 1. прибавь 2 2. умножь на 3. первая из них увеличивает число на экране на 2, вторая — утраивает его. сколько различных чисел можно получить из числа 2 с программы, которая содержит не более 4 команд?

Интересная, исследуем её. понятно, что программ будет 8. но в спрашивается, сколько разных чисел получится из двойки, поэтому нужно исследовать каждую программу 1. +++     +2) +2) +2 = 8 2. ++*       +2) +2) *3 = 18 3. +*+       +2) *3) +2  = 14 4. *++       *3) +2) +2 = 10 5. ***       *3)   *3)   *3 = 54  6. **+       *3)   *3) +2 = 20 7. *+*       *3) +2)   *3 = 24 8. +**       +2) *3)   *3 = 36 вот только теперь можно сказать что из 2 можно получить 8 разных чисел. ps арифметику проверь, писал напрямую в экран, мог допустить неточность.

программа на языке паскаль

program pr;

s: string;

begin

readln (s);

if length(s) mod 2=0 then writeln ('четное') else writeln('не четное');

readln;

end.

program xxx;

      var i : integer;

                a : array[1..15] of real;                   n : real;   begin    randomize;     for i: =1 to 15 do        a[i]: =random(20)-20;  

    writeln('исходный массив а: ');

    for i: =1 to 15 do

          write(a[i]);

    n: =a[1];

    a[1]: =a[15];

    a[15]: =n;

    writeln('полученный массив а: ');

    for i: =1 to 15 do

          write(a[i]);

    readln

end.