Question

С клавиатуры вводится массив из 15 элементов, состоящий из целых чисел. Сформировать новый массив, состоящий из элементов больше 10. паскаль очень надо

Answer 1

// PascalABC.NET 3.2, сборка 1399 от 08.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadArrInteger(15);
  var b:=a.Where(x->x>10).ToArray; b.Println
end.

Answer 2

Для начала нам нужно создать массив из 15 элементов, состоящий из целых чисел. Давайте представим, что у нас есть такой массив:

arr: [5, 12, 8, 15, 3, 10, 20, 7, 11, 9, 14, 6, 18, 4, 13]

Теперь мы хотим сформировать новый массив, состоящий из элементов больше 10. Давайте создадим новый массив и будем добавлять в него элементы из исходного массива, которые больше 10:

newArr: []

for i := 1 to 15 do begin if arr[i] > 10 then begin newArr[length(newArr) + 1] := arr[i]; end; end;

Теперь у нас есть новый массив, содержащий только элементы из исходного массива, которые больше 10:

newArr: [12, 15, 20, 11, 14, 18, 13]

Таким образом, мы сформировали новый массив, состоящий из элементов больше 10. Надеюсь, это поможет вам в решении вашей задачи!