0

这就是问题

有人可以帮助我吗,我真的不明白他们到底是如何在这个程序中得到 x*y 的……问题是程序是做什么的?

    PROGRAM iz52(output);
    VAR pom: integer;
    FUNCTION calc(x,y: integer): integer;
    BEGIN
    IF (y=1) THEN
    calc:= x
    ELSE
    calc:= calc(x, y-1) + x
    END;
    A) x+y 
    B) x*y
    C) x^y
4

0 回答 0