
Вопрос задан 16.07.2023 в 12:17.
Предмет Информатика.
Спрашивает Илясова Алина.
Дан массив К из 15 целых случайных чисел из интервала [0,50]. Найти в массиве: к5 – количество
чисел, кратных 5, к3 – количество чисел, кратных 3.

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

Отвечает Левашова Лиза.
Const n=15;
var
k: array [1..n] of integer;
i,k5,k3: integer;
begin
k5:=0; k3:=0;
for i:=1 to n do
a[i]:=random(51);
for i:=1 to n do begin
if a[i] mod 5=0 then inc(k5);
if a[i] mod 3=0 then inc(k3);
end;
writeln;
writeln(k3, ' ', k5);
end.
var
k: array [1..n] of integer;
i,k5,k3: integer;
begin
k5:=0; k3:=0;
for i:=1 to n do
a[i]:=random(51);
for i:=1 to n do begin
if a[i] mod 5=0 then inc(k5);
if a[i] mod 3=0 then inc(k3);
end;
writeln;
writeln(k3, ' ', k5);
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Для решения данной задачи, вам понадобится пройти по всем элементам массива и проверить, кратны ли они 5 и 3. Затем, вы должны посчитать количество чисел, удовлетворяющих каждому из условий.
Вот пример решения данной задачи на языке Python:
pythonimport random
# Создаем массив из 15 случайных чисел от 0 до 50
K = [random.randint(0, 50) for _ in range(15)]
# Инициализируем переменные для подсчета количества чисел, кратных 5 и 3
k5 = 0
k3 = 0
# Проходим по всем элементам массива и проверяем, кратны ли они 5 и 3
for num in K:
if num % 5 == 0:
k5 += 1
if num % 3 == 0:
k3 += 1
# Выводим результаты
print("Количество чисел, кратных 5:", k5)
print("Количество чисел, кратных 3:", k3)
Обратите внимание, что в данном примере используется модуль random
, чтобы создать массив из случайных чисел.


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

Информатика 566

Информатика 25

Информатика 22

Информатика 27

Информатика 34

Информатика 58

Информатика 63

Информатика 23
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili