Язык с++функция char* push(char* str) получает строку str и вставляет в первую позицию символ, стоящий на этой позиции (дублирует этот символ). функция возвращает адрес преобразованной строки str .функция char* detl(char* str, int ninsert) получает строку str, позицию ninsert вставки в ней символа и вставляет через каждые ninsert символов символ, стоящий на этой позиции (дублирует символ). функция через возвращаемое значение возвращает адрес преобразованной строки str или 0, если позиция вставки ninsert выходит за длину строки str. функция detl должна использовать функцию push.программа со стандартного устройства ввода считывает число ninsert, строки и выдает на экран те из них, в которых продублирован каждый ninsert символ слова. программа подсчитывает количество строк, в которых дублировались символы
n = 25;
var
a: array[1..n] of real;
i, j: integer;
min, max: real;
sum, product, harmonic: real;
begin
{ввод массива}
writeln('Данные массива:');
for i := 1 to n do
begin
a[i] := random(40) - 20;
write(a[i], ' ');
end;
writeln();
{подсчет суммы и произведения и агригатов}
sum := 0;
for i := 1 to n do
sum := sum + a[i];
writeln('average = ', sum / n);
{минимум и максимум}
min := a[1];
for i := 1 to n do
if min > a[i] then min := a[i];
writeln('min = ', min);
{подсчет суммы и произведения и агригатов}
sum := 0;
for i := 1 to n do
if i mod 2 = 0 then {если нужен фильтр}
sum := sum + a[i];
writeln('sum = ', sum);
end.