关于选择变量的简单帕斯卡

Question

假设有 10 个变量，每个变量都有一个由用户分配给它们的数字。我想让程序只添加大于 20 的，我该怎么做呢？？

Answer 1

由于我不知道您的确切要求，这里有两种选择：

program name;
var numbers:array[10]of integer;
    sum:integer;
begin
   sum:=0;
   for i:=1 to sizeof(numbers)do begin
      writeln('Insert a number');
      readln(numbers[i]);
   end;
   for i:=1 to sizeof(numbers)do begin
      if numbers[i]>20 then sum:=sum+numbers[i];
   end;
end.

或者

program name;
var numbers:array of integer;
    validate:integer;
begin
   for i:=1 to 10 do begin
      writeln('Insert a number');
      readln(validate);
      if validate>20 then numbers[i]:=validate;
   end;
end.

关于选择变量的简单帕斯卡

Simple pascal about selecting variables

pascal