12. Задание на паскале
Заполнить двумерный массив случайным образом и найти произведение больших 5 и кратных 3
Еще нужно сделать блок схему
Заполнить двумерный массив случайным образом и найти произведение больших 5 и кратных 3
Еще нужно сделать блок схему
Answers & Comments
//Внимание! Если программа не работает, обновите версию!
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.