请教

Question

请看看我的程序有什么问题
var
  num,nager:Integer;  // 数量,折扣率
  price,sumprice:singer; // 单价，总金额
begin
  sumprice:=(price*num)*nager/100;
end;
  为什么程序出错。请给出源代码

Answer 1

如果不是拼写错误：Single类型，那么显然这里没有错。到其他地方找错吧。
还有，你不给出报错时的提示信息，大家怎么帮你分析啊。

Answer 2

那肯定是integer的事了，，改成single;

Answer 3

var
  num,nager:Integer;  // 数量,折扣率
  price,sumprice:singer; // 单价，总金额
begin
  num:=10;nager:=20;price=30.0;//为每一个赋予一个初始值。另外，请将错误信息告知我们
  sumprice:=(price*num)*nager/100;
end;