Дан массив целых чисел состоящих из 20 элементов заполните его с клавиатуры. вывести индексы тех элементов значения которых больше числа а
274
476
Ответы на вопрос:
Pascalabc.net 3.4.2, сборка 1884 от 24.11.2018 внимание! если программа не работает, обновите версию!
begin
var p : = readarrinteger('вводите: ', 20);
var a : = readinteger('a =');
p.indexesof(t -> t > a).println; // индексы от нуля!
p.indexesof(t -> t > a).select(t -> t + 1).println; // номера от 1
end.
примервводите: -16 30 -24 30 -14 -11 -16 -2 -14 7 -23 9 9 11 -10 -5 25 30 -22 -6
a = 5
1 3 9 11 12 13 16 17
2 4 10 12 13 14 17 18
выберите, что вам нужно и удалите лишний выводПопулярно: Информатика
-
petrakovatatya01.02.2023 10:34
-
flagvamvruke21.06.2020 07:41
-
Empresssss06.09.2021 11:29
-
Qween12345200302.09.2022 14:39
-
kaba4ok200102.11.2021 22:58
-
0Neder028.09.2020 06:57
-
JAHGH25.03.2022 04:58
-
sarmat148224.06.2021 13:07
-
karinakatushkiowsqqh02.07.2020 09:09
-
tsukankova02mail17.06.2022 06:07