// 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