CailiVinchisiter
23.02.2022 19:13

Паскаль в массиве
1.Составьте программу, которая в одномерном массиве размерностью 12 (элементы случайные числа из промежутка от 1 до 9) подсчитывает количество чётных элементов. Оформите вывод элементов на экран в строчку, вывод количества чётных на следующей строке.

2.Составьте программу, которая в одномерном массиве размерностью 8 (элементы массива случайные числа из промежутка от 15 до 100) находит максимальный элемент. Оформите вывод элементов на экран в строчку, максимальный на следующей строке.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
melnikmaryana
12.10.2020 19:32

PascalABC.NET 3.5.1

#1

begin

 var A := ArrRandom(12, 1, 9);

 A.Println;

 A.Where(p -> p mod 2 = 0).Count.Println;

end.

#2

begin

 var A := ArrRandom(8, 15, 100);

 A.Println;

 A.Max.Println;

end.

Объяснение:

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота