Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
arsen7076ovwzre
23.07.2020 23:32 •
Информатика
Сформировать и вывести на экран массив элементов которого заданы датчиком случайных чисел на интервале [-56; 26] (размер произвольный) паскаль
Ответ:
Mmamagadzhieva
08.10.2020 17:51
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-56,26); a.Println
end.
Пример
n= 13
10 19 20 0 2 14 -16 -48 0 7 -51 19 -22
Ограничение на размер массива (n) - только здравый смысл.
0,0
(0 оценок)
Популярные вопросы: Информатика
Polyak56
10.05.2022 09:25
Сколько иероглифов в египетском письме?...
Ajosha
09.08.2021 06:18
Найти количество четных чисел в последовательности m,состоящий из 15 чисел го ,...
AelitaFox
05.07.2021 02:07
Составьте блок-схему алгоритма для сложения чисел от 1 до 100! ~—~...
ForaN777
14.05.2023 21:18
Вернулись Зульфия и Тимур из ШКОЛЫ П...раньше. А их уже подЖ...дают(...) борщ, (...) мак...роны с (...) сыром и чай с (...) сливками! Мама ещё утромзам...Сила тесто на (...)...
Milka20060711
20.05.2021 10:07
Program GOVNO; var c,Q,m,t1,t2:integer; x1,x2,x3:integer; begin writeln ( введите значение Q ); readln (Q); writeln ( введите значение m ); readln (m); writeln ( введите значение...
aldjona
20.05.2021 10:07
Разобраться в решении задачи. Записать условие задачи. Заполнить раздел описания переменных с указанием типа и назначения каждой переменной. Var Begin Sum:=0; For x:=1 to...
innaalekseenko1
15.04.2023 15:24
Запишите в виде математического выражения-Произведения числа 7 на сумму чисел a и d...
hshsjsnsvsbsns17282
15.05.2021 21:18
Только разбавленная серная кислота реагирует со всеми веществами ряда: FeO,BaCl2,Zn Fe,ZnO,Zn(OH)2 Ag,Cu,Au Cu,Fe2O3,Fe...
emilsalimov
23.08.2022 12:20
Закадируйте имя София и Полина...
neologisms
23.08.2022 12:20
Укажіть рівняння з однією змінною. x2+y2=1 y=2x2 3х-2 (х+1)(3-х)=0...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-56,26); a.Println
end.
Пример
n= 13
10 19 20 0 2 14 -16 -48 0 7 -51 19 -22
Ограничение на размер массива (n) - только здравый смысл.