Molsa
5 год назад
Заполнить массиа 20 случайных числами в интервале от 10 до 100 и вывести все элементы массива увеличенные на 50
ОТВЕТЫ
Прокофьевич
Jun 29, 2019
// PascalABC.NET 3.2, сборка 1379 от 21.01.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(20,10,100); a.Println;
a.Select(x-gt;x+50).Println
end.
Пример
24 22 31 78 68 99 82 27 83 15 84 71 14 11 14 59 83 80 24 90
74 72 81 128 118 149 132 77 133 65 134 121 64 61 64 109 133 130 74 140
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(20,10,100); a.Println;
a.Select(x-gt;x+50).Println
end.
Пример
24 22 31 78 68 99 82 27 83 15 84 71 14 11 14 59 83 80 24 90
74 72 81 128 118 149 132 77 133 65 134 121 64 61 64 109 133 130 74 140
145
Смежные вопросы: