Составить программу ** языке Паскаль. Найти количество элементов одномерного массива А...

Question

Составить программу на языке Паскаль. Найти количество элементов одномерного массива А (10), больших 10

Comments

А(10) - это название массива и количество элементов?

---

Я тоже об этом задумался, когда думал над эти, но потом вспомнил про этот сайт, думал тут пояснят

Answer 1

Будем считать, что (10) - это кол-во элементов массива. Тогда решение такое:

var
  A: array[1..10] of integer;
  k, i: integer;

begin
  for i := 1 to 10 do
  begin
    writeln('Введите числа массива:');
    readln(A[i]);
    
    if A[i] > 10
      then k := k + 1;
  end;
  writeln('Количество элементов, больших 10 - ', k);
end.

---