首页 > 试题广场 >

var a, b, c, d, ans : intege

[填空题]
var
  a, b, c, d, ans : integer;
begin
  readln(a, b, c);
  d := a - b;
  a := d + c;
  ans := a * b;
  writeln('Ans = ’, ans);
end.
输入 : 2 3 4
输出 :1

这道题你会答吗?花几分钟告诉大家答案吧!