Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
mariii222
06.07.2020 20:31 •
Информатика
Заполните массив на 50 элементов целыми значениями, лежащими в диапазоне от -22 до 15, и организуйте вывод элементов с индексами от 14 до 34
Ответ:
MATVEI235
03.10.2020 13:20
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var a:=ArrRandom(50,-22,15); a.Println; Println;
13.To(33).Select(i->a[i]).Print
end.
Тестовое решение:
4 -21 6 -12 -5 -16 14 -4 -7 -13 5 -4 10 -7 -9 7 13 4 -3 -9 -11 -10 15 -16 15 7 10 0 -11 -5 5 14 -13 -7 6 -1 7 6 2 -15 -16 -7 -19 -19 -17 -6 -15 7 -8 1
-7 -9 7 13 4 -3 -9 -11 -10 15 -16 15 7 10 0 -11 -5 5 14 -13 -7
0,0
(0 оценок)
Популярные вопросы: Информатика
fjdjwjqksnddjj
09.12.2020 13:17
Укажите область применения программ finereader cuneiform...
alina1abikeeva
03.05.2022 02:47
Перевод числа 2015 из десятичной в шестнадцатиричную и восьмеричную систему...
TheLaikerMap
09.07.2022 00:29
Определите значение переменной а после выполнения фрагмента алгоритма. a:=20; b:=1 a:=(a+b) div 3; b:=a-2*b a:=a-b...
nastyakravchen6
02.11.2020 10:10
Даны x, у. найти квадратный корень из произведения x и у, вычислить случайное число в диапазоне [x, у), получить целую часть от частного x и у. составит программу на языке...
meowpeww10
02.11.2020 10:10
Информатика массивы заполнить массив 10 элементами с клавиатуры и вывести его на экран вывести на экран элементы равные индексам....
хорошистка553
02.11.2020 10:10
Написать программу вычисления n! =1*2*3**n...
dima102603
27.06.2020 14:21
Авансом рабочий получил 4550 руб., что составило 25% суммы, которую он должен получить за выполненную работу. Какую плату за всю работу должен получить рабочий дайте ответ....
lida105
15.04.2020 21:23
Раскройте правильно скобки. Знак (не) равенства; рассказывать (не) былицы; явная (не) справедливость; обидная (не) внимательность; обсуждали (не) успеваемость, а поведение;...
ОляКatschanjukolaola
15.04.2020 21:23
Выписать из презентации о европейской колонизации ( цель, колонии заранЕЕ...
KATE270701
15.04.2020 21:23
Здравствуйте , кто может написать текст на 10-12 предложений как я отмечаю свой день рождения на немецком языке...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
var a:=ArrRandom(50,-22,15); a.Println; Println;
13.To(33).Select(i->a[i]).Print
end.
Тестовое решение:
4 -21 6 -12 -5 -16 14 -4 -7 -13 5 -4 10 -7 -9 7 13 4 -3 -9 -11 -10 15 -16 15 7 10 0 -11 -5 5 14 -13 -7 6 -1 7 6 2 -15 -16 -7 -19 -19 -17 -6 -15 7 -8 1
-7 -9 7 13 4 -3 -9 -11 -10 15 -16 15 7 10 0 -11 -5 5 14 -13 -7