Предмет: Информатика,
автор: nastyamarvel
Дан массив целых чисел, в котором есть нулевые элементы. Создать массив из номеров этих элементов. Pascal
50баллов
Ответы
Автор ответа:
0
// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-2,2); a.Println;
var b:=a.IndexesOf(t->t=0).Select(t->t+1).ToArray;
b.Println
end.
Пример
n= 15
1 -1 0 2 0 0 -2 -2 -2 -2 0 2 0 -2 -1
3 5 6 11 13
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-2,2); a.Println;
var b:=a.IndexesOf(t->t=0).Select(t->t+1).ToArray;
b.Println
end.
Пример
n= 15
1 -1 0 2 0 0 -2 -2 -2 -2 0 2 0 -2 -1
3 5 6 11 13
Автор ответа:
0
не получается
Автор ответа:
0
Что именно не получается?
Похожие вопросы
Предмет: Қазақ тiлi,
автор: FasTIKoff
Предмет: Английский язык,
автор: Аноним
Предмет: Английский язык,
автор: anichka1020
Предмет: Математика,
автор: Аноним