Решать на pascal abc объединить два массива a и - вопрос №5565094 от magakhass 20.02.2021 19:16

Question

Информатика: Решать на pascal abc объединить два массива a и b в массив c.

magakhass · Answer

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
var a:=ArrRandom(ReadInteger('m='),10,20); a.Println;
var b:=ArrRandom(ReadInteger('n='),30,40); b.Println;
Writeln('Массив С');
var c:=a+b; c.Println;
end.

Тестовое решение
m= 8
12 14 15 13 15 16 14 10
n= 11
40 33 37 37 33 31 32 38 35 37 35
Массив С
12 14 15 13 15 16 14 10 40 33 37 37 33 31 32 38 35 37 35