高手给看看哪错了

var

i:integer;

p,q:real;

begin

read(p,q);

i:=0;

while ((i*p/100)

0 条评论

目前还没有评论...

信息

ID
1041
难度
6
分类
其他 | 数学 点击显示
标签
(无)
递交数
8263
已通过
2321
通过率
28%
被复制
11
上传者