Есть ответ 👍

Дан одномерный массив p[n] найти максимальный элемент и заменить его нулем

166
500
Посмотреть ответы 2

Ответы на вопрос:


Var ar: array of integer; n,max,maxi,i: integer; begin; randomize; readln(n); setlength(ar,n+1); writeln('first array: '); for i: =1 to n do   begin;   ar[i]: =random(100);   write(ar[i]: 4);   if ar[i]> max then     begin;     max: =ar[i];     maxi: =i;     end;   end; ar[maxi]: =0; writeln; writeln('final array: '); for i: =1 to n do write(ar[i]: 4); end.

Основные *создавать новый документа имея при этом шаблоны. *возможность работы в нескольких документах. *автоматическая проверка орфографии. *расширенные возможности по форматированию текста. *возможность отправки готового документа. дополнительные *удобное выделение текстовых фрагментов*расширенный буфер обмена; вставка скриншота*улучшение читаемости*применение водяного знака*повтор последней команды*простановка знаков ударения*настройка верхней ленты под личные нужды*быстрое выделение фрагмента текста

Популярно: Информатика