1. Что такое программа? 1) Список команд 2) Запись - вопрос №12732686112 от evgen22regioon 22.01.2020 03:09

Question

Информатика: 1. Что такое программа? 1) Список команд 2) Запись алгоритма на языке программирования 3) Другое название приложения 2. Почему язык Паскаль является универсальным языком программирования? 1) Он может применяться для решения разных задач 2) Он совместим с любой операционной системой 3) Он используется в разных странах 3. Как в языке Паскаль называются цепочки символов, рассматриваемых, как единые смысловые элементы с фиксированным значением? 1) Зарезервированные имена 2) Служебные символы 3) Служебные

evgen22regioon · Answer

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
var m:=ReadInteger('Количество элементов в массиве А (m):');
var n:=ReadInteger('Количество элементов в массиве B (n):');
var k:=ReadInteger('Позиция вставки k (1<k<m):');
if (k>1) and (k<m) then begin
    var a:=ArrRandom(m,1,99); Writeln('Массив A'); a.Println;
    var b:=ArrRandom(n,1,99); Writeln('Массив B'); b.Println;
    Writeln('Результат вставки'); (a[:k]+b+a[k:]).Println
    end
else Writeln('Вы нарушили условие 1<k<m')
end.

Тестовое решение
Количество элементов в массиве А (m): 10
Количество элементов в массиве B (n): 6
Позиция вставки k (1<k<m): 4
Массив A
68 64 30 75 36 15 50 39 92 26
Массив B
56 68 97 30 95 63
Результат вставки
68 64 30 75 56 68 97 30 95 63 36 15 50 39 92 26