Язык с++функция char* push(char* str) получает строку str и вставляет в первую позицию символ, стоящий на этой позиции (дублирует этот символ). функция возвращает адрес преобразованной строки str .функция char* detl(char* str, int ninsert) получает строку str, позицию ninsert вставки в ней символа и вставляет через каждые ninsert символов символ, стоящий на этой позиции (дублирует символ). функция через возвращаемое значение возвращает адрес преобразованной строки str или 0, если позиция вставки ninsert выходит за длину строки str. функция detl должна использовать функцию push.программа со стандартного устройства ввода считывает число ninsert, строки и выдает на экран те из них, в которых продублирован каждый ninsert символ слова. программа подсчитывает количество строк, в которых дублировались символы​

1)смысл этого в том, чтобы все понимали, с чем они сталкиваются каждый день, как это действует. Ведь не зря наше время называется информационной эпохой.

2) Ну наверное более трудных, и в тоже время интересных заданий

3)Мне кажется всем было бы интересно узучить фотошоп, или урок по компьютерным играм, такие уроки делают в некоторых школах.

4)Ну вообщем, ничего не есть на уроках, ни в коем случае не пить и не доставать жидкости, провода не трогать и не ходить по классу.

5)* тут я незнаю как проходят твои уроки*

//PascalABC.NET версия 3.2, сборка 1389
//Если программа не запускается, то обновите версию
uses System.Linq;
begin
    begin
        writeln('I');
        var n := ReadInteger('n=');
        Writeln((1 + 1 + Power(2, n - 1)) * n / 2);
    end;
    
    begin
        writeln;
        writeln('II');
        var n := ReadInteger('n=');
        Writeln(n mod 11 = 0 ? 'YES' : 'NO');
        
    end;
    
    begin
        writeln;
        writeln('III');
        var a := ReadArrInteger('Документы', ReadInteger('n=')).ToList;
        writeln;
        
        while a.Any() do
        begin
            write(a[0], ' ');
            a.RemoveAt(0);
            if not a.Any then break;
            
            write(a.Last, ' ');
            a.RemoveAt(a.Count - 1);
            if not a.Any then break;
            
            var n := 0;
            if a.Count > 1 then n := a.Count div 2 - 1;
            write(a[n], ' ');
            a.RemoveAt(n);
        end;
    end;
end.