Вопрос задан 17.01.2020 в 16:29. Предмет Информатика. Спрашивает Остапенко Екатерина.

1)составьте программу,которая заполняет массив a[1..10]случайными целыми числами в диапазоне от 0

до 2 и выводит на экран количество элементов,равных 1. 2)массив a[1..10]заполните случайными целыми числами в диапазоне от 1 до 10. Определите,есть ли в массиве элемент,равный 5. Ответ выведите в виде слов "Да"или "Нет".
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Юркевич Ирина.

1)

var

  a: array[1..10] of integer;  //Массив целочисленных элементов а

  i, n: integer;  //n - количество элементов, равных 1

 

begin

  n:= 0;  //Обнуляем счетчик

  write('Исходный массив:  ');

  for i:= 1 to 10 do  {Заполняем массив случайными элементами от 0 до 2, распечатываем его и считаем количество элементов, равных 1}

  begin

    a[i]:= random(3);

    write(a[i], '  ');

    if a[i] = 1 then n:= n + 1;

  end;

  writeln;

  writeln('Количество элементов, равных 1:  ', n);

end.

2)

var

  a: array[1..10] of integer;  //Целочисленный массив а

  i: integer;

  b: boolean;  {Логическая переменная, определяющая, есть ли в массиве элемент, равный 5}

begin

  b:= false;  //Присваиваем начальное ложное значение логической переменной

  write('Исходный массив:  ');

  for i:= 1 to 10 do  {Заполняем массив элементами в диапазоне от 1 до 10 и печатаем его}

  begin

    a[i]:= random(9) + 1;

    write(a[i], '  ');

  end;

  writeln;  //Перевод на новую строку

  for i:= 1 to 10 do //Определяем, есть ли в массиве элемент, равный 5

    if a[i] = 5 then  {Если элемент равен 5, то печатаем 'да', присваиваем переменной b истинное значение и break - выход из цикла}

    begin

      writeln('Да');

      b:= true;

      break;

    end;

  if b = false then writeln('Нет');  {Если в массиве нет элемента, равного 5, печатаем 'Нет'}

end.

Отметь решение, как лучшее, плиз.   

    

     

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Конечно, вот пример программы на языке программирования Python, выполняющей задачи, описанные вами:

1. Программа, заполняющая массив случайными целыми числами от 0 до 2 и выводящая количество элементов, равных 1:

```python import random

# Создаем массив a с десятью элементами a = [random.randint(0, 2) for _ in range(10)]

# Выводим массив print("Массив a:", a)

# Считаем количество элементов, равных 1 count_ones = a.count(1)

# Выводим результат print("Количество элементов, равных 1:", count_ones) ```

2. Программа, заполняющая массив случайными целыми числами от 1 до 10 и определяющая, есть ли в массиве элемент, равный 5:

```python import random

# Создаем массив a с десятью элементами a = [random.randint(1, 10) for _ in range(10)]

# Выводим массив print("Массив a:", a)

# Проверяем, есть ли элемент, равный 5, в массиве if 5 in a: print("Да, в массиве есть элемент, равный 5.") else: print("Нет, в массиве нет элемента, равного 5.") ```

Обе программы используют модуль `random` для генерации случайных чисел. В первой программе мы создаем массив из 10 случайных чисел от 0 до 2 и подсчитываем количество элементов, равных 1. Во второй программе массив заполняется случайными числами от 1 до 10, и затем проверяется, есть ли в нем элемент, равный 5.

0 0

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос