对SIN函数进行抽样 一个周期(2*pi)内取64个点把这些点的值,一十六进制的格式保存在。。。(100分)

  • 主题发起人 主题发起人 fisheryj
  • 开始时间 开始时间
F

fisheryj

Unregistered / Unconfirmed
GUEST, unregistred user!
对SIN函数进行抽样 &nbsp;一个周期(2*pi)内取64个点把这些点的值,一十六进制的格式保存在<br>yujian.txt文件里<br>100分<br>program Projt2;<br><br><br><br>uses<br>&nbsp; Windows, Messages, SysUtils,math,Variants, Classes, Graphics, Controls, Forms,<br>&nbsp; Dialogs;<br><br><br><br>const<br>pi =3.1415927;<br>var<br><br>&nbsp; i:integer;<br>&nbsp; x:real;<br>&nbsp; y:real;<br>&nbsp; filename:TextFile;<br>&nbsp; Name:string;<br>&nbsp; j:integer;<br>begin<br>&nbsp; name:='d:/yujian.txt';<br>&nbsp; assignfile(FileName,name);<br>&nbsp; reset(FileName);<br>&nbsp; i:=0;<br>repeat<br><br>&nbsp; x:=i div 64*2*pi;<br>&nbsp; y:=sin(x);<br>&nbsp; writeln(filename,format('%x',[123])<br>);<br>&nbsp; write(filename,',');//用,来区分每个数<br>&nbsp; if i&gt;64 then break;<br>&nbsp; i:=i+1;<br>until (false);<br><br>&nbsp;closefile(filename);<br><br><br>end.<br>
 
为什么没人回答
 
没看懂意思?<br>‘一个周期(2*pi)内取64个点把这些点的值,一十六进制的格式保存在<br>yujian.txt文件里’指什么啊?<br>
 
接受答案了.
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
860
import
I
I
回复
0
查看
827
import
I
I
回复
0
查看
810
import
I
后退
顶部