问题1:
编写一个做算术题的程序,程序的设计界面如图3-3所示。程序执行时,单击【出题】按钮,将随机产生100以内的非负加数和被加数,当在等号“=”右边的方框里写出正确答案后,单击【结果】按钮,将显示“答案正确”;如果输入的答案不正确,将显示“答案错误”。
那个随机产生的数怎么做啊????
问题2:
正切函数怎么使用阿,我想实现输入一个数,单击按钮后,输出正切值

解决方案 »

  1.   

    1.随机数要用到randomize和random函数
    2.正切函数是math单元的tan函数
      

  2.   

    产生一个随机数~
    var
      i: integer;
    begin
      Randomize; //随机数生成器初始化,不能漏掉
      i := Random(100); //产生100以内的随机数
    end;Delhpi中正弦函数为sin(X)
    X为角度(弧度)
    所以要记得转换~
    比如取30度的正弦值就要写成sin(30 * PI / 180);
    PI为圆周率~
    可以用const语句定义PI的值~
    也可直接指定为3.14~
      

  3.   

    哦~
    正切是tan~~
    记得uses math