Вопрос по информатике:
12. Задание на паскале
Заполнить двумерный массив случайным образом и найти произведение больших 5 и кратных 3
Еще нужно сделать блок схему
Пожаловаться
- 19.08.2018 00:23
- Информатика
- remove_red_eye 15256
- thumb_up 45
Ответы и объяснения 1
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=MatrRandom(5,5,-99,99); mas.Println;
var a:=mas.ElementsByCol.Where(t->(t>5) and (t mod 3 =0));
var b:=a.Aggregate(biginteger(1),(x,y)->x*y);
Writeln('Произведение =',b);
end.
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=MatrRandom(5,5,-99,99); mas.Println;
var a:=mas.ElementsByCol.Where(t->(t>5) and (t mod 3 =0));
var b:=a.Aggregate(biginteger(1),(x,y)->x*y);
Writeln('Произведение =',b);
end.
Пожаловаться
- 19.08.2018 10:14
- thumb_up 13
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы