Заполнить массив из 15 элементов числами из интервала -10 до 10 вывести в строчку и вывести на экран порядковые номера элементов не меньше заданного числа М
Ответы на вопрос
Ответил Аноним
0
PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(15,-10,10); a.Println;
var M:=ReadInteger('M=');
a.IndexesOf(t->t>=M).Select(t->t+1).Println
end.
Пример
-5 2 1 5 -1 -9 -10 -2 -7 -6 2 -8 -9 -5 8
M= 3
4 15
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(15,-10,10); a.Println;
var M:=ReadInteger('M=');
a.IndexesOf(t->t>=M).Select(t->t+1).Println
end.
Пример
-5 2 1 5 -1 -9 -10 -2 -7 -6 2 -8 -9 -5 8
M= 3
4 15
Ответил allangarsk
0
ответ не совпадает
Ответил Аноним
0
А с чего он будет на случайных числах совпадать?
Ответил Elfsp1r1t
0
Блок схему можно пж к этой проге?
Ответил Аноним
0
Можно. Если кто-то ее нарисовать захочет. В вашем вопросе о блок-схеме не было ни слова, а разные хотелки-дополнения по мере получения ответов, не упомянутые в вопросе, на этом Сервисе выполнять не принято.
Ответил allangarsk
0
да, грубовато
Новые вопросы