Аватар
Информатика, опубликовано 2018-08-22 18:58:52 by Гость

Написать программу:Заменить нулём максимальные числа в массивеПомогите плиз:)

Аватар
Ответ оставил Гость

//PascalABC.NET 3.2 сборка 1318

var
  max:integer;
begin
var arr:=ReadArrInteger(readinteger());
max:=arr.Max;
arr.Replace(arr,max,0);
arr.Print;
end.

Пример ввода:
4
1 2 3 3
Пример вывода:
1 2 0 0

Вопрос
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.