Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Vitruviius
04.02.2021 19:27 •
Информатика
Составить программу, которая формирует массив из 13 случайных целых чисел, принадлежащих промежутку [-20; 20] и выводит эти числа в строку через запятую
Показать ответ
Ответ:
lev2121
07.10.2020 08:12
Var
A: array [1..13] of integer;
i: byte;
begin
randomize;
for i := 1 to 13 do
begin
A[i] := random(41)-20;
write(A[i],', ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
1Радуга1
17.04.2022 08:22
Таблица сравнение растровой, векторной и фрактальной графики (фото) + столбец фрактальная , строчки форматирование изображения , программы ...
Loader
13.06.2021 10:04
Створіть проект для розв язання і: клієнт поклав у банк певну суму грошей. щорічно банк додає до суми заздалегідь визначений відсоток від суми, що зберігається на рахунку після...
руслан746
27.02.2021 01:02
Исскуственный интелект план...
polyakovred
25.02.2021 19:17
Укажите результат выполнения программы var a,b: integer; procedure proc(var a: integer; b: integer); begin b: =4; a: =6; b: =a+b; end; begin a: =2; b: =3; proc(a,b); writeln(a,...
SkipMe
07.02.2023 18:53
Решить по информатике нужно переаести крзу капусту и волка на другой берег известно что в лодку влезает только 2 человека(тоесть ты и ктото ещё) и известно что козу нельзя оставлять...
go0d2312
27.05.2022 13:48
Оля за час решает 12 задач из сборника, а Олег – на 25% больше. Сколько задач в сборнике, если Олегу требуется на 3 часа меньше, чем Оле, чтобы полностью решить его? ответ:...
123451175
14.06.2021 21:50
Как называется целенаправленное воздействие управляющего объекта на объект управления? • Системный анализ •Физика • Управление •Кибернетика...
Turtygin
29.02.2020 09:46
Выбери сферы кибернетики.экономикасоциология буря вычислительная техникаМарс...
bazilik
01.05.2023 06:56
Визначте масу 15моль калій оксиду...
denisprokopev
08.08.2022 16:55
Характеристика образа охотника из произведения Трудный хлеб Е.Носов 1)портрет2)поступки3)манеры,привычки4)биография5)речь6)авторская характеристика7)говорящая фамилия...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
A: array [1..13] of integer;
i: byte;
begin
randomize;
for i := 1 to 13 do
begin
A[i] := random(41)-20;
write(A[i],', ');
end;
end.