首页 > 试题广场 >

program program1; var &nb...

[填空题]
program program1;
var
    a, b, c, d, e: integer;
begin
    a := 79; b := 34; c := 57; d := 0; e := -1;
    if (a < c) or (b > c) then d := d + e
    else if (d + 10 < e) then d := e + 10
    else d := e - a;
    writeln(d);
end.
输出:1

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