'導入命名空間 Imports System.IOImports NPOI.HSSF.UserModelImports NPOI.HPSFImports NPOI.POIFS.FileSystem Private Sub A1() '自定格式 Dim workbook As HSSFWorkbook = New HSSFWorkbook() '建立一個 Excel 實例 Dim fs = New FileStream("book1.xls", FileMode.Create) '準備建
# -*- coding: utf-8 -*- import numpy as np import matplotlib.pyplot as plt # 複素数列の計算回数を出力する関数loopmax def loopmax(z, c): # 複素数列の初項 z_next = z # 最大計算回数 num = 1000 # 計算回数まで計算 for i in range(1, num + 1): # 発散しない限り if abs(z_next) <= 2: # 次の項を計算 z = z_next