Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
nastenkasysuev
29.09.2022 14:56 •
Информатика
Заполнить массив 15-ю целыми случайными числами из диапазона [-30; 70]. паскаль или кумир
Ответ:
Pars1fal
08.10.2020 09:40
PascalABC.NET 3.3.5, сборка 1650 от 01.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(15,-30,70); a.Println
end.
Пример
-26 55 10 -13 9 -21 22 -1 16 23 42 -4 58 -11 59
0,0
(0 оценок)
Ответ:
igor1337d
08.10.2020 09:40
Var
A: array [1..15] of integer;
i: integer;
begin
for i := 1 to 15 do
begin
A[i] := random(101)-30;
write(A[i]:4);
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Englismen
13.08.2020 02:53
Дан алгоритм:1. Сравнить a и b. Если a b,то в качестве максимума t принять a, иначе (a =b) в качестве максимума принять b (t=b).2. Сравнить t и c. Если t c, то перейти...
mariberrr
24.03.2022 19:57
Как выглядит клавиатура у китайцев???...
lenamolchanova1
19.04.2020 15:36
Укажите через пробел в порядке возрастания все десятичные числа, не превосходящие 45, запись которых в двоичной системе счисления оканчивается на 1010?...
demonsmurnov75
22.03.2021 16:47
Составьте программу, которая запрашивает стоимость 1 кг конфет и выводит на экран стоимость 0.1, 0.2, 0.3, 1 кг конфет. результат работыпрограммы может выглядеть так:...
Настюнькаz
22.03.2021 16:47
На заводе по производству биотоплива выращивают биомассу, ежеднев но масса биомассы увеличивается на 30 %. 1 сентября масса составляла1.5 т. выведите на экран количество...
bistreeee
05.02.2022 15:45
Почему опыт по обнаружению сил притяжения между атомами твердых тел удалось выполнить со свинцовыми цилиндрами, а не со стальными? ...
hehehdhd
08.09.2022 18:58
Напишите сочинение на ! с переводом! тема: один дома сочинение должно быть до момента когда первый раз приехали воры, но увидев свет ! ! ...
rostislav2017
15.03.2023 14:23
Запишите растений ставропольского края которые удалось от изчезновения...
sashaorlov2006
06.09.2022 05:47
ответьте на билет по проявление внутренних процессов на земной поверхности дадите ответ в мире будет больше котят; )...
wtfareudoing
06.03.2020 18:23
Найдите значение выражения 6a(2b-3a)+2(3a-b)2 при a=-0,15, b=2....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(15,-30,70); a.Println
end.
Пример
-26 55 10 -13 9 -21 22 -1 16 23 42 -4 58 -11 59
A: array [1..15] of integer;
i: integer;
begin
for i := 1 to 15 do
begin
A[i] := random(101)-30;
write(A[i]:4);
end;
end.