1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
//SCI2C: DEFAULT_PRECISION= DOUBLE function mainfunction() a=%pi*70; b=1; c=0; M = (1:3)'*(1:5) if a<=1 c=b; disp(c) else if b==10 c=5; disp(c) else c=2; disp(c) S = c.^M; disp(S); disp(a) end end endfunction