Задан массив из 7 целых чисел. заменить все положительные - вопрос №51602217 от lanka202 04.03.2023 14:14

Question

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

lanka202 · 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;...