Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
gjjfdkjgfyijh
01.12.2020 09:22 •
Информатика
Создать программу получения и обработки одномерного массива – вектора: вычислить значения 35 элементов одномерного целочисленного массива f в интервале (-6, 10) с использованием генератора случайных чисел
Ответ:
applevip
04.10.2020 09:31
Const n=35;
var f:array[1..n] of integer;
i:integer;
begin
Randomize;
for i:=1 to n do
begin
f[i]:=random(16)-6;
write(f[i]:3);
end;
writeln;
end.
Пример (для n=15):
9 6 2 9 6 0 -5 -5 -4 9 4 5 -1 3 5
0,0
(0 оценок)
Популярные вопросы: Информатика
Анжелика200611111
13.02.2023 22:37
Кому не трудно) ! ерунду всякую не писать! выполнять в паскале) )) 1. опишите комбинированный тип для записей, содержащих следующие данные учеников: фамилию, имя, год рождения,...
светлана498
20.02.2023 20:30
Министр финансов дурляндии выпустил в обращение только монеты достоинством в 7 и 11 дуриков. покупатель должен заплатить продавцу ровно 5 дуриков. сумеют ли они рассчитаться,...
denzozp08hc1
31.05.2022 19:01
Какие присказки есть в сказке пойди туда не знаю куда и сколько раз...
юрий201
31.05.2022 19:01
Числа 271 и 43 перевести числа в двоичную, восьмеричную, шестнадцатиричную систему счисления и проведите арифметические действия: сложение и вычитания....
Sergei12121
26.04.2022 18:07
Что будет лежать в переменной Х после выполнения команды: Х=765%100...
aibar4
25.01.2020 18:20
S=4 for k in range(8,3,-1) s+=3 Укажите сколько раз будет выполнено тело цикла а так же значение переменной S после завершения программы...
Карисёнок
08.02.2022 21:10
отвечаем на вопросы 1. Что такое бит? 2. Сколько бит в 1 байте? 3. Чему равен 1 Эбайт? 4. Как определить объем информации? 5. Как перевести информацию из одной единицы измере-...
Alice1st
07.06.2023 03:44
ОЧЕНЬ Середини сторін трикутника АВС мають координати К(-2;2), L(0;7), M(4;-1).Знайдіть площу трикутника ABC....
golenkova240620
08.03.2022 02:53
с заданием нужно составить 10 предложений с частицами...
zigzag19
07.06.2023 03:44
Бледная поганка однаклеточная или многоклеточная?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var f:array[1..n] of integer;
i:integer;
begin
Randomize;
for i:=1 to n do
begin
f[i]:=random(16)-6;
write(f[i]:3);
end;
writeln;
end.
Пример (для n=15):
9 6 2 9 6 0 -5 -5 -4 9 4 5 -1 3 5