关于选择变量的简单pascal

假设有10个变量，每个变量都有一个由用户指定的数字。

---

我想让程序只添加大于20的，我该怎么做？？？

因为我不知道你到底想要什么，这里有两个选项：

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.

或

---

检查变量是否大于20，然后Sum变为Sum PLUS变量注意大于20和大于等于20。我仍然无法理解当你说每个变量都有一个由用户指定的数字时，你想知道用户是如何输入它们的吗？很不清楚你到底想要什么。您要做的是：（1）学习如何创建数组，并设置一个由10个数字组成的数组（您需要确定这些数字是整数还是浮点，并为它们选择一种数字类型），然后（2）将用户数字读入数组，以及（3）将sum变量初始化为0，并使用

for

循环检查每个数组元素的值是否大于20（

如果num[i]>20，则sum:=sum+1；

）。你应该做一个Pascal教程。

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.