if-statement - 方案:如果条件有多个程序

Question

我试图弄清楚如何让我的 if 语句执行多项任务，但如果有意义的话，只返回一件事。另外，我不知道如何在同一行中打印字符串和变量。

例如，你会如何在scheme中做这样的事情(以下是java)

if(num < x){
  num++;
  x = 0;
  System.out.println("The value of x is " + x " and num is now" + num);
}

别的
System.out.println("错误");

这是我尝试过的:

(if (< num x) 
( (define num (+ 1 num))
   (define x 0)
   ;idk how to print it
   )
"error";else
)

Answer 1

您可以使用 begin评估一系列表达式的效果，
并返回最后一个。您也可以使用 printf打印:

(if (< num x)
    (begin
      (set! num (add1 num))
      (set! x 0)
      (printf "The value of x is ~a and num is now ~a\n" x num))
    "error")

但是请记住，使用 set!破坏(变异)变量
在 Racket 中不鼓励使用。最好返回新值。这个很难(硬
向您展示如何做到这一点，在这里，没有稍微大一点的例子
和更多的上下文。无论如何，如果你有兴趣那应该是
它自己的新问题在这里。