Задан массив из 7 целых чисел. заменить все положительные - вопрос №75160446 от satinovgerman 30.06.2022 18:52

Question

Информатика: Задан массив из 7 целых чисел. заменить все положительные элементы данного массива на его максимальный элемент

satinovgerman · Answer

Max:=-32768;for i:=1 to 7 doif a[i] max thenmax:=a[i];for i:=1 to 7 doif a[i] o then a[i]:=max;...