Задача 1. Задан одномерный целочисленный массив размерности 7. Найти и вывести ** экран...

+555 голосов
5.1m просмотров

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


Информатика (34 баллов) | 5.1m просмотров
+81

Желаю удачи

+153

так согласен

+162

Ок бро. Как ты понял я был не в курсе. Но если ты ответишь правильно я отмечу как лучший

Дан 1 ответ
+82 голосов

// 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.6k баллов)