| r5 | ||
|---|---|---|
| r3 | 1 | == 1 == |
| r2 | 2 | table = @[6,3] |
| r4 | 3 | matr = [64.5@E6,40@E6,48.5@E6]; |
| 4 | susc = +@pi*10@E-7*4 | |
| r2 | 5 | freq = [10@E4,10@E5,10@E6,10@E7,10@E8,10@E9] |
| 6 | ||
| 7 | for [row, column] in table | |
| r4 | 8 | table(row,column) = (1/+sqrt(+@pi*matr(column)*freq(row)*susc)) |
| r2 | 9 | end |
| r3 | 10 | table |
| 11 | ||
| 12 | == 2 == | |
| r5 | 13 | matr = 64.5@E6; |
| 14 | susc = +@pi*10@E-7*4; | |
| 15 | Plot(1 / sqrt(+@pi*x*susc*matr)) | |
| r3 | 16 | |
| r5 | 17 | == 3 == |