
Помогите с Информатикой пожалуйста. №1 Напишите программу ,которая в последовательности целых чисел
определяет кол-во чисел, оканчивающихся на 5. Программа получает на вход одномерный массив из 20 случайных чисел в диапазоне значений от 100 до 200. Программа должна вывести одно число : кол-во чисел , оканчивающихся на 5 или вывести сообщение "Таких чисел нет".Ввод и вывод массива организовать при помощи процедуры. №2 Напишите программу ,которая в последовательности целых чисел определяет максимальное число ,кратное 3 .Программа получает на вход двухмерный массив из 40 случайных чисел в диапазоне значений от -100 до 100. Программа должна вывести одно число - максимальное число ,кратное 3 или вывести сообщение "Таких чисел нет'. Ввод и вывод массива организовать при помощи процедуры.

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

//PascalABC.NET версия 3.2, сборка 1389
//Если программа не запускается, то обновите версию
begin
var a := ArrRandomInteger(20, 100, 200);
Println(a);
var k := a.Count(x -> x mod 10 = 5);
Writeln((k = 0) ? 'Таких чисел нет' : k.ToString());
end.
2)
//PascalABC.NET версия 3.2, сборка 1389
//Если программа не запускается, то обновите версию
begin
var a := ArrRandomInteger(40, -100, 100);
Println(a);
var max := a.Count(x -> x mod 3 = 0);
if max <> 0 then
max := a.Where(x -> x mod 3 = 0).Max;
Writeln((max = 0) ? 'Таких чисел нет' : max.ToString());
end.



Решение №1: Подсчет чисел, оканчивающихся на 5
Для решения этой задачи мы можем написать программу, которая будет проходить по массиву из 20 случайных чисел в диапазоне от 100 до 200 и определять количество чисел, оканчивающихся на 5. Ввод и вывод массива можно организовать при помощи процедуры.
```python import random
# Функция для генерации массива из 20 случайных чисел в диапазоне от 100 до 200 def generate_array(): return [random.randint(100, 200) for _ in range(20)]
# Процедура для вывода массива def print_array(arr): print("Массив случайных чисел:", arr)
# Функция для подсчета чисел, оканчивающихся на 5 def count_numbers_ending_in_5(arr): count = sum(1 for num in arr if num % 10 == 5) if count > 0: print("Количество чисел, оканчивающихся на 5:", count) else: print("Таких чисел нет")
# Генерируем массив arr = generate_array()
# Выводим массив print_array(arr)
# Подсчитываем числа, оканчивающиеся на 5 count_numbers_ending_in_5(arr) ```
Решение №2: Поиск максимального числа, кратного 3
Для этой задачи мы можем написать программу, которая будет проходить по двумерному массиву из 40 случайных чисел в диапазоне от -100 до 100 и определять максимальное число, кратное 3. Ввод и вывод массива также можно организовать при помощи процедуры.
```python import random
# Функция для генерации двумерного массива из 40 случайных чисел в диапазоне от -100 до 100 def generate_2d_array(): return [[random.randint(-100, 100) for _ in range(4)] for _ in range(10)]
# Процедура для вывода двумерного массива def print_2d_array(arr): print("Двумерный массив случайных чисел:") for row in arr: print(row)
# Функция для поиска максимального числа, кратного 3 def find_max_multiple_of_3(arr): max_multiple_of_3 = max((num for row in arr for num in row if num % 3 == 0), default=None) if max_multiple_of_3 is not None: print("Максимальное число, кратное 3:", max_multiple_of_3) else: print("Таких чисел нет")
# Генерируем двумерный массив arr_2d = generate_2d_array()
# Выводим двумерный массив print_2d_array(arr_2d)
# Ищем максимальное число, кратное 3 find_max_multiple_of_3(arr_2d) ```
Надеюсь, эти программы помогут вам с вашими задачами по информатике!


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