Pascal,с объяснениями пожалуйста Дан массив А(5,5), элементы которого случайные числа...

0 голосов
47 просмотров

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


Информатика (86 баллов) | 47 просмотров
0

Как вы назвали «древний»?

0

Все версии паскаль, кроме PascalABC.NET, базируются на версии Никлауса Вирта, разработанной в 1969-1971 гг.

0

Естественно, они и технологии используют полувековой давности. А для компьютеров это отрезок времени почти в вечность.

0

Да, "древний". Хотя я предпочитаю говорить "мамонтячий".

0

А PascalABС.NET - это язык XXI века, заточеннный на обучение. Авторы затолкнули в него все лучшее из языков C#, Python и Haskell, но при этом оставили лаконичным и простым Паскалем.

0

Ну я начинаю с простого,дальше больше

0

Знаете, я не буду пытаться Вас в чем-то убеждать. Но если Вы в состоянии уделить чтению 10-15 минут - прочитайте самое начало вот этой книги, не пропуская рецензии и введение, возможно это заставит Вас задуматься: http://pascalabc.net/downloads/OsipovBook/StudentChoice.pdf

0

Хорошо,ночью уже читать не буду
А с утра время выделю

0

Ссылку не потеряйте)

0

Хорошо,благодарю за информацию

Дан 1 ответ
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.


image
(1.6k баллов)
0

Там немножно строка с .Print съехала, но это не Питон, тут отсткпы неважны