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

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

Задать свой вопрос
Вера
А(10) - это заглавие массива и количество частей?
Анатолий Савров
Я тоже об этом задумался, когда размышлял над эти, но потом вспомнил про этот сайт, мыслил здесь пояснят
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] gt; 10
      then k := k + 1;
  end;
  writeln('Количество частей, великих 10 - ', k);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт