Информатика 8 класс, программирование
Если произведение трёх чисел равно нулю, нулевые элементы заменить суммой этих трёх чисел
Если произведение трёх чисел равно нулю, нулевые элементы заменить суммой этих трёх чисел
More Questions From This User See All
Answers & Comments
Verified answer
beginvar a:=ReadArrInteger('Введите 3 чисел:',3);
var i:=a.Aggregate(1,(i,j)->i*j);
var s:=a.Aggregate(0,(i,j)->i+j);
if i=0 then a.Replace(0,s);
a.Println;
end.