Pascal 编程中的步长值

Question

我想要一个编程代码来打印范围之间的奇数来教学生。这里我取范围为1到10。所以我想打印1到10之间的奇数。

我编写此代码是为了打印 1 到 10 之间的奇数

program printOdd1to10; {Prints odd numbers 1 - 10}

var counter : integer;
begin

   for counter := 1 to 10 do

      begin
        Writeln(counter); {prints new line}
        counter := counter + 2 {increment by value 2, like step 2}
      end;
        Readln;

end.

但是当我运行时，它会打印出一长串错误答案。那么，如何在 Pascal 编程中打印这样的模式：奇数、偶数、3(3,6,9...) 次数字。

Answer 1

根据杰夫的回答，编写程序的最佳方法是使用“while”。

i:= 1;  // start with an odd number
while i < 10 do
 begin
  writeln (i);
  i:= i + 2;  // or inc (i, 2)
 end;

每次将 i 加 2 将确保 i 始终为奇数，因此无需检查这一点。