{"author_name":"fortran66","published":"2009-02-28 23:40:05","url":"https://fortran66.hatenablog.com/entry/20090228/1235918405","blog_title":"fortran66\u306e\u30d6\u30ed\u30b0","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Ffortran66.hatenablog.com%2Fentry%2F20090228%2F1235918405\" title=\" \u305d\u306e\u4ed6 - fortran66\u306e\u30d6\u30ed\u30b0\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","provider_url":"https://hatena.blog","provider_name":"Hatena Blog","categories":["Compiler"],"height":"190","description":"CP/M-80 (FN) \u30d5\u30a1\u30a4\u30eb\u540d\u306f\u5927\u6587\u5b57\u306e\u3053\u3068\u3002\u62e1\u5f35\u5b50\u306fFOR\u3002 cpm.exe f80 (FN), (FN)=(FN) cpm.exe L80 (FN)/E, (FN)/N cpm.exe (FN) C Newton's Method PROGRAM SQROOT WRITE(*, *) 'input positive real' READ(*, *) A X = 0.1 * A DO 10 I = 1, 10 X = 0.5 * ( X + A / X ) WRITE(*, *) I, X, X * X 10 CONTINUE STOP END CP/M-86 cpm86.exe f7\u2026","type":"rich","title":" \u305d\u306e\u4ed6","image_url":null,"width":"100%","version":"1.0","blog_url":"https://fortran66.hatenablog.com/","author_url":"https://blog.hatena.ne.jp/fortran66/"}