fork download
copy 
  1. @(p,q)poly([roots(p);roots(q)])*p(1)*q(1)
  2.  
  3. ans([1,1], [1,4,6,4,1])
Success #stdin #stdout 0.7s 121792KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
ans =

@(p, q) poly ([roots(p); roots(q)]) * p (1) * q (1)

ans =

 Columns 1 through 3:

   1.00000 + 0.00000i   5.00000 + 0.00000i  10.00000 - 0.00000i

 Columns 4 through 6:

  10.00000 - 0.00000i   5.00000 - 0.00000i   1.00000 + 0.00000i
https://ideone.com/mjDuII
language:
Octave (octave 4.4.1)
created:
7 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!