Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Егор1123321
19.12.2022 18:41 •
Информатика
Напиши программу в pascal, которая заполняет массив rost длиной 12 случайными числами от 150 до 180
Ответ:
mikimays2003Sasha
04.10.2020 03:17
Var rost: array [1..12] of integer;
i: integer;
begin
for i:=1 to 12 do
begin
rost[i]:=random(30)+150;
write (rost[i]:5);
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
мамочка92
13.10.2021 14:44
КОД НА С Даны два числа: a и b — коды символов. Ваша задача — вывести все символы, ASCII-коды которых лежат между a и b включительно, в порядке возрастания их кодов....
янубтытруп
27.05.2022 20:10
Не(первое число четное)и(последняя цифра не четная) 1)1234 2)6843 3)3561 4)4562...
bobrikov01
07.06.2022 09:37
Как вычислить информационный объем ...
veyper1
10.07.2020 20:56
Выберите текстовый редакторExcelPascal ABCPaintWordПроверить ответ...
Ibrolya
21.04.2023 12:15
Эргономтка бұл көмектесіңдерш...
vikulyagorobet
17.01.2020 22:06
решить на c++: В маленьком городке М начала действовать служба контроля за незаконными полетами НЛО. Первая задача службы — выяснить, сколько НЛО действует в окрестности...
крузейро
30.11.2022 19:54
На питоне:Вывести на одной строке числа 1, 13 и 49 с одним пробелом между ними....
misha22656
26.07.2022 19:16
Уровень с 1. Используя таблицу, зашифруй и запиши три пословицы о Родине. стр 24 Уровень С...
Kykyshonochek1305
08.10.2020 22:23
Выполняем в тетради Заполни в тетради?Электронная подписьКриптография Шифр Цезаря стр 23...
Danilenok
17.10.2020 17:05
Задание 1 на скрине покакзангякпоп...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
i: integer;
begin
for i:=1 to 12 do
begin
rost[i]:=random(30)+150;
write (rost[i]:5);
end;
end.