Войти Регистрация Спроси ai-bota

Задан массив a(m).заменить отрицательные элементы массива a, расположенные до максимального элемента, на нули.

Ответ:

dasew1

31.07.2020 20:29

// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
for var i:=0 to a.IndexMax-1 do
if a[i]<0 then a[i]:=0;
a.Println
end.

Тестовое решение:
n= 15
-35 4 87 60 -93 -23 -95 -24 -19 -52 10 91 -53 -67 -1
0 4 87 60 0 0 0 0 0 0 10 91 -53 -67 -1

0,0(0 оценок)

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

selivanovartem1

25.01.2021 03:24

:сделать функцию определения того, что данное число является факториалом: function reversef (f: integer; var n: integer): boolean (возвращает true, если f – факториал, n – число,...

МировойПельмень

25.01.2021 03:24

Что такое стиль абзаца? 1.поименованный набор параметров оформления символов и абзаца быстрого оформления типовых фрагментов текста 3.кнопка на панели форматирования 4.команда...

aminka0095

07.06.2022 09:12

Дано число. если это число положительное,то вывести что оно положительное.в противном случае вывести,что оно отрицательное...

Karina5252

07.06.2022 09:12

Написать программу через паскаль: известна масса каждого предмета загружаемого в автомобиль определить общую массу груза pascal...

matema2

22.04.2023 07:41

1. на остановке стоит человек в ожидании автобуса №3.какое кол-во информации несет сообщение о том, что к остановке подъехал автобус №4? ( а) 1 бит; б) нулевая информация; в)...

nata3212

01.07.2022 01:27

Преобразуйте сказуемое данных предложений в Passive Voice. 1.They built this house in 1960. 2.The teacher corrects our exercise. Преобразуйте предложения в косвенную речь 1. “...

НЕЗНАЙКА2283371

01.07.2022 01:27

Кроссворд на тему внутренние органы человека не менее 10 во и ответов ...

ROSTMIX

01.07.2022 01:27

Вставь гласную перед нн в страдательных причастиях времени. 1. Потер нные кем-то вещи. 2. Разброс нные по комнате вещи. 3. Привлеч нный к ответственности нарушитель....

НастяФем

01.07.2022 01:27

Укажи ряд слов, в котором на месте пропусков пишется буква Дна...писать, о...битьо...таять, пре...почтениео...бросить, пре...чувствоватьпо...ставить, по...писчик...

Август228

01.07.2022 01:27

Выбери многочлены, которые содержат общий множитель 1,5−3;−0,5+1;0,8−0,8;−;1,5−;−0,8+. Выбери правильный ответ: 1,5−3;1,5− другой ответ 0,8−0,8;−;−0,8+ 1,5−3;−0,5+1;1,5− 0,8−0,8;−...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку