请帮我编一篇文章，谢谢！300-400
答案:1 悬赏:0 手机版
解决时间 2021-08-18 05:02
- 提问者网友：溺爱和你
- 2021-08-17 13:50
用以下几个词：尖利，能耐，悠闲，寒噤，阴惨，仄歪，央告，转弯抹角，明月风清，张皇失措。任选其三！
最佳答案
- 五星知识达人网友：千杯敬自由
- 2021-08-17 14:59
procedure TForm1.Button1Click(Sender: TObject);vari,gold:integer;money: double;begin money:=0; gold:=strtoint(Edit1.Text); begin i:=gold Div 100; case i of 0: money:= gold ; 1: money:= gold*(0.9); 2: money:= gold*(0.8); 3: money:= gold*(0.7); 4: money:= gold*(0.6); else money:=gold*(0.5) ; end; end; Label2.Caption:=floattostr(money) ;end;这是我编的看看 行不 我感觉你的思路还是比较乱
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯