Дан массив 10 на 10. Заданные случайным образом числа выбираются из отрезка от -50 до 50. Все элементы массива, которые делятся на 3 без остатка возвести в квадрат
Решить в ПаскальАВС
Ответы на вопрос
Ответил BobbyFresnel
0
===== 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.
Приложения:
Новые вопросы