Задача 1. Задан одномерный целочисленный массив размерности 7. Найти и вывести на экран его элементы, которые меньше 12. Задача 2. Задан одномерный целочисленный массив размерности 10. Вывести на экран номера положительных элементов этого массива Если выполните хотя бы 1 из 2 то буду считать что справились,

Geopolit Geopolit    2   24.06.2020 16:26    3

Ответы
ayserg1980ozvpli ayserg1980ozvpli  15.10.2020 14:48

// PascalABC.NET 3.6.3

begin

 var a := ArrRandom(7, -20, 30);

 a.Println;

 a.Where(p -> p < 12).Println;

 Writeln;

 var b := ArrRandom(10, -50, 50);

 b.Println;

 b.Indices((v, i) -> v > 0).Select(p -> p + 1).Print

end.


Задача 1. Задан одномерный целочисленный массив размерности 7. Найти и вывести на экран его элементы
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика