Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Аринаqwe
25.02.2022 02:57 •
Информатика
Заполнить целочисленный массив случайными числами, значения которых лежат в интервале от -50 до +50. (паскаль)
Ответ:
artem110616
07.10.2020 23:50
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50);
a.Println;
end.
Пример
n= 15
24 17 2 47 -32 20 -39 -36 3 -1 -44 35 40 -20 -35
0,0
(0 оценок)
Популярные вопросы: Информатика
LediDiana2005
02.05.2021 17:59
Как закрепить больше 1 файла в ?...
tinkimolko
18.11.2022 11:14
Распределите по видам информационных процессов этапы работы над презентацией ...
Ziri12
18.12.2020 01:53
6. Поменяйте между собой значения трех переменных по схеме x-y-z-x. 7. Чему равно х в результате выполнения фрагмента:x: =2;x:=x+x;x: =x-x; 8. Покажите на экране таблицы...
bananxhik
26.10.2021 07:40
Перевернуть пятизначное число в питоне...
валерия852
14.12.2021 08:01
Почему устройство компьютера делятся на основные и периферийные? ...
baten
09.12.2020 21:59
Виды информации и свойства информации...
Анастасия1708035
26.08.2022 12:53
Решите , программа-Паскаль....
ilyapleshakov29
31.12.2020 07:47
Найти такой набор из 5 гирь, чтобы, располагая их на одной чаше весов, можно было бы взвесить любой груз до 31 кг включительно...
88000535285
31.12.2020 07:47
Кладовщик одного склада оказался в большом затруднении: заказанный комплект гирь для простых чашечных весов не прибыл...
Fagga322
31.12.2020 07:47
Некогда был пруд, в центре которого рос один лист водяной лилии. Каждый день число таких листьев удваивалось, и на десятый день вся...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50);
a.Println;
end.
Пример
n= 15
24 17 2 47 -32 20 -39 -36 3 -1 -44 35 40 -20 -35