1樓：
沒有現代軟體，退而求其次，用上古時期的GrafEq畫的
先導出PCX再到BMP再到PNG，可麻煩了
不過效果並不遜色於現代軟體呢（笑）
2樓：「已登出」
(define
(zhihux)
(- (/
1x)(
floor (/
1x))))
(define x(
letloop
((tmp
0.00001))(
if (
<=tmp1.6)(
cons
tmp(
loop(+
tmp0.02
)))'
())))
(define y(
mapzhihux))
(define
(close?ab
)(if (
<(abs (-
ab))0.01)#t
#f))
(call-with-output-file"c:/users/lh/desktop/zhihu.txt"
(lambda (p
)(let
loop((x
0))(if
(<=x1.6)(
begin
(display
"."p)(
loop(+
x0.02
))))
(newline p))
(let
loop
((row1))
(if(>=
row0)(
letloop2
((tmp1x)
(tmp2y))
(if(null?
tmp1)(
begin
(display
"\n"p)
(loop(-
row0.02
)))(
if (
close?
(car
tmp2
)row)(
begin
(display
"*"p)(
loop2
(cdr
tmp1)(
cdrtmp2
)))(
begin
(display
"."p)(
loop2
(cdr
tmp1)(
cdrtmp2
))))))))
(let
loop((x
0))(if
(<=x1.6)(
begin
(display
"."p)(
loop(+
x0.02
))))
(newline p))
'done
))這個IO沒寫好，畫出來老是有幾行（和行座標對應的）空行，手動調整一下就好了。我懶得去檢查了。
再畫乙個sin(8x)的影象
O@O@@OOOOOOO@@OO@@@@OOO@@@@@@OOOOOOOOOOOO@@@@@@OO
3樓：韓祝鵬
傳不了圖，寫個退而求其次的答案：
1.買個樹莓派，裡面自帶乙個免費的 Wolfram Mathematica：
Plot[1/x - Floor[1/x], , PlotRange -> All]
2.或者去 WolframAlpha，輸入 1/x - Floor[1/x]
1/x - Floor[1/x] - Wolfram|Alpha
C 中x x 1與x 1 x 的區別？
kanmars 施主，莫要著相了 運算子優先順序的問題，我從08年開始就再沒遇到過了，是又如何，不是又如何，有什麼優先順序不是一對括號解決不了的?人生拘泥於這種小細節而不學滄海之無涯，等到白髮蒼蒼之時，只是熟知自家院子裡的每一塊磚下的風景，何談行走天下?善哉 Milo Yip 運算子 的優先順序必定...
已知正數 x y 滿足 x y 1，如何求 5x 2 y 1 的最大值？
讓我用拉格朗日乘子法來吊打這個問題！Clear Global mathematica11.2,win7 64bit f 5 x 2 y 1 t x 2 y 2 1 拉格朗日乘子法建立目標函式 ans Solve D f,0,FullSimplify 求偏導數，求解方程組 aaa ans FullSi...
解法二的面積公式是怎麼表示的？x1y2減x2y1什麼意思？
cool math 占個坑一會講 其實沒有必要割裂高中數學與大學數學，高中也可以有方法推導出大學數學的內容 開啟電腦開始更新 很好的問題，其他答主的回答也很好，但用外積顯然有些讓高中生難以接受，這篇回答是以高中知識推導這個公式進而引出外積的概念。其實學習本該是這個樣子，廢話不多說，開始。對於 其中 ...