Дан массив 10 на 10. Заданные случайным образом числа выбираются из отрезка от -50 до 50. Все элементы массива, которые делятся на 3 без остатка возвести в квадрат
Решить в ПаскальАВС
Решить в ПаскальАВС
More Questions From This User See All
Answers & Comments
===== PascalABC.NET =====
begin
var a := MatrRandom(10, 10, -50, 50);
a.Println;
a.Transform(a -> a mod 3 = 0 ? a * a : a);
a.Println(5)
end.