Регистрация
varyuska
28.06.2021 00:34
Информатика
Есть ответ 👍

Одномерный массив. Отрицательные элементы заменить максимальным элементом.

172
178
Посмотреть ответы 3

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

baumwolle
baumwolle
4,4(46 оценок)

// PascalABC.NET

begin

 var n := ReadInteger('n =');

 var a:= ArrRandom(n, -99, 99);

 a.Println;

 var m := a.Max;

 a.Transform(p -> p < 0 ? m : p);

 a.Print

end.

sharshukovauly
sharshukovauly
4,4(46 оценок)
                                      PascalABC.NET                                       beginvar a:=ArrRandom(ReadInteger('Введите размер:'),-10,10);Println(a);a.ForEach((x,i) -> if x<0 then a[i]:= a.Max);Println(a);end.

Пояснение:

ArrRandom(a,b,c) возвращает массив размера a, заполненный случайными целыми значениями в диапазоне от b до с.

Пример работо

вика3879
вика3879
4,6(30 оценок)
25 - 18 = 7  - кол-во человек получивших 5 25 - 21 = 4 - кол-во человек получивших 2 25 - 7 - 4 = 14 - кол-во оставшихся, т.е. получивших 3-4

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