< >

Pascal,с объяснениями пожалуйста
Дан массив А(5,5), элементы которого случайные числа из [15;80]. Найти произведение нечётных элементов массива. В

SashaMocg: Как вы назвали «древний»?
BobbyFresnel: Все версии паскаль, кроме PascalABC.NET, базируются на версии Никлауса Вирта, разработанной в 1969-1971 гг.
BobbyFresnel: Естественно, они и технологии используют полувековой давности. А для компьютеров это отрезок времени почти в вечность.
BobbyFresnel: Да, "древний". Хотя я предпочитаю говорить "мамонтячий".
BobbyFresnel: А PascalABС.NET - это язык XXI века, заточеннный на обучение. Авторы затолкнули в него все лучшее из языков C#, Python и Haskell, но при этом оставили лаконичным и простым Паскалем.
SashaMocg: Ну я начинаю с простого,дальше больше
BobbyFresnel: Знаете, я не буду пытаться Вас в чем-то убеждать. Но если Вы в состоянии уделить чтению 10-15 минут - прочитайте самое начало вот этой книги, не пропуская рецензии и введение, возможно это заставит Вас задуматься: http://pascalabc.net/downloads/OsipovBook/StudentChoice.pdf
SashaMocg: Хорошо,ночью уже читать не буду
А с утра время выделю
BobbyFresnel: Ссылку не потеряйте)
SashaMocg: Хорошо,благодарю за информацию

Ответы

Ответ дал: BobbyFresnel
0

// PascalABC.NET

begin

 var a := MatrRandom(5, 5, 16, 80);

 a.Println;

 a.ElementsByRow

     .Where(p -> p.IsOdd)

     .Aggregate(BigInteger.One, (p, q) -> p * q)

     .Print

end.

Приложения:
BobbyFresnel: Там немножно строка с .Print съехала, но это не Питон, тут отсткпы неважны
Похожие вопросы
Математика
1 год назад
срочно, цифры написаны наверно не правильно
Химия
1 год назад
помогите решить задачу39. Хлорид натрия массой 5,85 г обработали при комнат-ной температуре раствором серной кислоты с w (H,50) = = 98 % массой 20 г. Выделившийся газ пропустили через избыток
Математика
1 год назад
Складіть числовий вираз і обчисліть його значення: 1) до суми чисел -6 і -19 додати число 15; 2) до числа -3,6 додати суму чисел -7,2 і 4,5; 3) до суми чисел -1,4 і -1,8 додати суму чисел -5,2 і
Математика
1 год назад
-121: (75-2x) = 11 ????? ​
Українська мова
2 года назад
Запишіть словами,якщо годинник показує: 18.05, 7.45, 10.55,12.00 наприклад:12.45- дванадцята сорок п'ять​
Українська мова
2 года назад
Суфікс закінчення корень слова плазмовий
Алгебра
8 лет назад
-(3y-5c)+2(y+c), 4a+3c-3a-4c, 3(3k-c)-(3c-k), 4(y-a)-5(2a-y), 2a-y-3a+2y, 4(a-x)-2(3a-x), -(3a-c)+3(3c-a) С ПОЛНЫМ РЕШЕНИЕМ
Химия
8 лет назад
После полной нейтрализации 365 г хлороводородной кислоты избытком едкого натра получено 117 г поверенной соли. Определите массовую долю (в %) хлороводорода в исходной кислоте.