Задание С++: записать арифметическое выражение на алгоритмическом языке и указать порядок выполнения операций. Напишите полный код

1)необходимо аккуратно обращаться с проводами;
запрещается работать с неисправным компьютером;
нельзя заниматься очисткой компьютера, когда он находится под напряжением;
недопустимо самостоятельно проводить ремонт оборудования при отсутствии специальных навыков;
нельзя располагать рядом с компьютером жидкости, а также работать с мокрыми руками;
нельзя в процессе работы с ПК прикасаться к другим металлическим конструкциям (например, батареям);
не допускается курение и употребление пищи в непосредственной близости с ПК и др

// PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
// Внимание! Если программа не работает, обновите версию!

procedure ArrRead(var a:array of integer);
begin
  var n:=ReadInteger('Количество элементов в массиве:');
  a:=ReadArrInteger('Введите элементы массива:',n)
end;

procedure ArrMult(a:array of integer; var p:BigInteger);
begin
  p:=a.Aggregate(BigInteger(1),(p,q)->p*q)
end;

begin
  var m1,m2:array of integer;
  ArrRead(m1); ArrRead(m2);
  var p1,p2:BigInteger;
  ArrMult(m1,p1); ArrMult(m2,p2);
  Writeln('Произведение элементов первого массива ',p1);
  Writeln('Произведение элементов второго массива ',p2);
  Writeln('Общее произведение ',p1*p2)
end.