限制pascal语言中的一个变量从一到十

program Project1;
uses
  math;
var
  num1: integer;
  power: integer;
  answer: integer;
begin
  writeln('This program will accept two input values and raise the first number to the power of the second value');
  writeln('Please enter the first number');
  readln(num1);
  writeln('Please enter the second number');
  readln(power);

  answer:= (num1**power);
  writeln(answer);
  readln();
end.

我一直在不知疲倦地研究几个小时,以找出如何将变量限制在1到10之间。请谁告诉我,如何将变量num1限制在1到10之间。

转载请注明出处:http://www.bizarre-animals.com/article/20230331/2500364.html