Заменить первый отрицательный элемент нулём. Паскаль АБЦ. Обязательно нужно использовать команду рандомайз. Приведённый ниже пример не является верным. В нём не хватает команды Рандомайз var a:array[1..10] of integer; i,t:integer; Begin for i := 1 to 10 do read(a[i]); for i := 1 to 10 do begin if (a[i]<0) and t=0 then begin a[i]:=0; t:=1; end; writeln(a[i]); end; End. Помогите пожалуйста

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Заменить первый отрицательный элемент нулём. Паскаль АБЦ. Обязательно нужно использовать команду рандомайз. Приведённый ниже пример не является верным. В нём не хватает команды Рандомайз var a:array[1..10] of integer; i,t:integer; Begin for i := 1 to 10 do read(a[i]); for i := 1 to 10 do begin if (a[i]<0) and t=0 then begin a[i]:=0; t:=1; end; writeln(a[i]); end; End. Помогите пожалуйста» от пользователя Ростислав Старостенко в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.