pascal - 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.

但是当我运行时，它会打印出一长串错误的答案。
那么，如何在帕斯卡编程中像这样打印 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 始终为奇数，因此无需检查。