Сизиф играет сам с собой в такую игру. у него есть лестница из 100 ступенек, на каждой ступеньке написан ее номер – число от 1 до 100. на ступеньках с номерами 1, 100 и 92 лежат по камню. за один ход сизиф берет любой крайний камень (лежащий на ступеньке с самым маленьким или на ступеньке с самым большим номером) и кладет его на ступеньку ровно посередине между двумя другими камнями. если же между двумя другими камнями четное количество ступенек, он выбирает любую из двух средних. когда ни один камень нельзя переложить таким образом, игра заканчивается. какое наибольшее количество ходов может продолжаться игра?

мальчик с пальчик, карлик нос,буратино,карабас барабас,змей горыныч, царевна лягушка,

#include < cstdlib> #include < iostream> using namespace std; int main(int argc, char *argv[]){      int n;       cout< < "введите количество элементов массива."< < endl;       cin> > n;       int mas1[n];       int mas2[n];             for(int i=0; i< n; i++){      mas1[i] = rand()%100; //заполняем массив случайными числами от 0 до 100      if(mas1[i]%10 == 4) {                                mas2[i]=mas1[i]/2;                                 cout< < "замена! ";                                 }      else {cout< < "\t";                 mas2[i]=mas1[i];                 }      cout< < mas1[i]< < '\t'< < mas2[i]< < endl;       }      system("pause");       return exit_success; }

первая программа считает сумму входящих в строку цифр стоящих на местах с нечетными номерами, начиная с первой, если это буква то вместо нее берется 0(ноль)

результат выполнения

аб2в457где245*ж0247025020

2) 

var s, r: string; i: integer;

begin readln(s); r : = ''; for i : = 1 to length(s) do if s[i] < > 'c' then r : = r + s[i]; writeln(r); end.

и какая вероятность что пользователь не

program i_guess_number; uses crt; var changes: array [1..2,1..10] of integer; i,op,n: integer; s: string; res: real; begin      randomize;       writeln("загадайте число");       n : = 0;       repeat            n : = n+1;             i : = random(10);             op : = random(4);                         case op of                  1: s : = "прибавте ";                   2: s : = "отнимите ";                   3: s : = "умножте на ";                   else s : = "поделите на ";             end;                         writeln(s, i);             changes[1,n] : = op; {запоминаем действия}            changes[2,n] : = i;       until n = 10;             writeln("что вышло? ");       readln(res);             for i : = n downto 1 do { производим обратные действия }      begin            case changes[1,i] of                  1: res : = res - changes[2,i];                   2: res : = res + changes[2,i];                   3: res : = res / changes[2,i];                   else res : = res * changes[2,i];             end;       end;                   writeln("вы загодали ",res); end.