tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Заполнить массив из 15 элементов
Заполнить массив из 15 элементов числами из интервала -10 до 10 вывести в строчку и вывести на экран порядковые номера элементов не меньше заданного числа м
aiiiotbahiiiot
3 22.09.2019 00:50
2
Ответы
ИгорьВсемогущий
08.10.2020 08:19
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
taetae8
07.04.2020 16:30
Весь день голову ломаю, уже учитель пристаёт...
алинекмалинек
08.04.2020 14:54
пож с информатикой. В задании вычислить переменную на выходе, и написать программы к данным схемам на языке Паскаль....
lerakycher2001
08.04.2020 14:54
Расположите величины в порядке убывания: 1024 бита, 1000 байтов, 1 бит, 1 байт, 1 Кбайт.Переведите:2,5 байта = бит20 Кб = байт2048 байт = Кб2560 Кбайт = МбСравните (поставьте...
ayserg1980ozvpli
08.04.2020 14:55
Задача 47_1. В двумерном массиве, заполненном случайными числами найти сумму положительных, произведение отрицательных и количество элементов равных нулю. Количество элементов...
яло203
02.04.2020 12:34
информатика 8 клас paython 4 разных задачи...
FACE02
02.04.2020 12:32
ПРОЙТИ ТЕСТ ПО ИНФОРМАТИКЕ. 8 КЛАСС LAZARUS1.Програмний код містить оголошення Button1:TButton: Оберіть правильні твердження (несколько ответов)a)Об єкт має назву Button1б)ТButton...
КрендельЙА
20.05.2020 10:23
The farmer was a mean man, after a day in town the woman was happy исправить ошибки если они есть...
Daman1777
20.05.2020 10:23
Исправьте ошибки в следующих предложениях. 1.Мы провели в нашем районе форум доярок. 2. Они внесли огромную лепту в выполнение плана. 3. Состоялся первый дебют молодой...
engelsvova
20.05.2020 10:23
ответить на во Кентервильское привидение (Ваулина, Дули, Подоляко) 1. Джеймсу будет слишком жарко, если он посетит Кипр в Audust. А это В, будет В, С будет D, были 2....
khetagmuriev1
20.05.2020 10:23
Задание 41. Консументом леса является?A. дождевой червякв. берёзаС. волк D. пенёк...
Популярные вопросы
Мне нужно описание эскала,князя веронского из ромео и джульетта...
2
Из числового ряда 1,2,3,4,5,6,7,8,9 выпишите пары чисел 1) сумма которых...
3
Раскройте скобки: (-3)*(х-у) раскройте скобки и выражение: 12-(х+3)...
3
Заряд, электрическое поле увеличили в 2 раза. во сколько раз увеличится...
2
Применение оксид углерода(4) углекислый газ...
2
Какое минимальное количество бит потребуется для кодирования положительных...
3
1)решите неравенство: 2х-1 4х-7 2)решите неравенство: +4х+30 3)при...
2
Содной и той же станции одновременно к противоположным направлениям...
1
Скорость скутер на 24км ч больше скорости велосипедиста. расстояние...
3
Отрезки ас и вм пересекаются и точкой пересечения делятся пополам....
3
Внимание! Если программа не работает, обновите версию!
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