Алг нач целтаб А[1:2, 1:3] цел а, б вывод "Исходная матрица:", нс нц для а от 1 до 2 нц для б от 1 до 3 А[а,б] := irand(-9,9) вывод А[а,б], " " кц вывод нс кц вещ Б если А[1,1] >= 0 то Б := 0 нц для а от 1 до 2 нц для б от 1 до 3 Б := Б + А[а,б] кц кц вывод "Сумма = ", Б иначе Б := 1 нц для а от 1 до 2 нц для б от 1 до 3 Б := Б * А[а,б] кц кц вывод "Произведение = ", Б всё кон