Очень СРОЧНО!!!!! 50 баллов Дан целочисленный массив A размера N. Переписать в новый...

+807 голосов
1.0m просмотров

Очень СРОЧНО!!!!! 50 баллов Дан целочисленный массив A размера N. Переписать в новый целочисленный массив B все чётные числа из исходного массива(в том же порядке) и вывести размер полученного массива и его содержимое. Это задача Array54 из задачника PT4. Решение нужно на PascalABC.net !!!!!


Информатика (45 баллов) | 1.0m просмотров
Дан 1 ответ
+73 голосов

Ответ:

--- PascalABC.NET 3.6.2 ---

begin

 var N := ReadInteger('Enter "N": ');

 var A := ArrRandom(N, -99, 99);

 A.Println; //Для проверки

 var B := A.Where(p -> p mod 2 = 0).ToArray;

 B.Println;

end.

Объяснение:

(1.6k баллов)
+49

Спасибо вам большое!!!)

+106

B.Println -> B.Count.Println; B.Println

+177

Здравствуйте, ещё заметил, что нет вывода кол-ва элементов(это одно из условий задачи). Поможете?)

+97

Возможно из за того, что в решении размерность массива вводится с клавиатуры пользователем. Удалите строку var N := ReadInteger(); и добавьте const N = значение перед begin если необходимо задавать размерность массива как константу

+85

не правильно. Ошибка: ''Попытка вывести лишние данные''