Вопрос задан 24.10.2023 в 12:43. Предмет Информатика. Спрашивает Ерёмина Катя.

Есть ли в массиве трёхзначные числа заканчивающееся на 9?

0 0
Перейти к ответам

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

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

Program NoName;

Var i,n,k: integer;

a:array[1..9999] of integer;

Begin

k:=0;

Write("Количество вводимых цифр = ");

Read (n);

For i:=100 to n do

Begin

Read(a[i]);

If (a[i] > 100)and(a[i] mod 9 = 0)and(a[i] < 1000)then

k:=k+1;

End;

If k > 0 then

Write ("Да")

Else

Write ("Нет")

End.

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

Для определения наличия трехзначных чисел в массиве, заканчивающихся на 9, вам нужно пройти по всем элементам массива и проверить каждый элемент на соответствие вашему условию.

Пример кода на языке Python, который может выполнить это действие:

python
# Ваш массив my_array = [123, 456, 789, 999, 876, 543, 198] # Создаем переменную для хранения результата has_three_digit_number_ending_in_9 = False # Проходим по всем элементам массива for number in my_array: if number >= 100 and number <= 999 and number % 10 == 9: has_three_digit_number_ending_in_9 = True break # Если нашли такое число, можно завершить цикл # Проверяем результат if has_three_digit_number_ending_in_9: print("В массиве есть трехзначное число, заканчивающееся на 9.") else: print("В массиве нет трехзначных чисел, заканчивающихся на 9.")

Этот код пройдет по всем элементам массива и проверит каждый элемент. Если найдется хотя бы одно трехзначное число, заканчивающееся на 9, переменная has_three_digit_number_ending_in_9 будет установлена в True, и программа выведет сообщение о наличии такого числа в массиве. В противном случае будет выведено сообщение о его отсутствии.

0 0

Похожие вопросы

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

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

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