Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
пажалуйста4
21.02.2022 05:13 •
Информатика
Напишите программу,которая вводит натуральное число n и выводит на экран n всевдо случайных чисел (несколько вариантов решений,паскаль)
Показать ответ
Ответ:
ilyaxybaeshka
07.08.2020 14:16
Тут два варианта подряд
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var n := ReadInteger('n=');
ArrRandomInteger(n, 10, 99).Println;
for var i := 1 to n do
write(random(80) + 10, ' ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
liza1288
10.05.2021 13:40
Воспользуйтесь схемой Горнера для представления числа 0,12345 в 6 ...
altunbaevmax
10.02.2022 15:06
Для чого і як використовують буфер обміну office?...
fgdgtdgg
09.05.2020 20:29
Форма представления информации картина в музее...
sailorproblema
09.05.2020 20:29
4школьника посещали кинотеатр. первый бывал в нем каждый четвертый день, второй – каждый пятый, третий – каждый седьмой, четвертый – каждый девятый....
marktopskiy34567
09.05.2020 20:29
Средства взаимодействия человека и компьютера это интерфейс 16 букв...
QueenNics
20.08.2021 23:19
Задача 17. Оборудование сахарных заводов работало в отчетном году 100 дней вместо запланированных 110. Определить коэффициент экстенсивной загрузки оборудования. ...
СуПерБро123
18.07.2022 06:34
Вариант MA2090402 1. Даны векторы а= -2i+4j, b4;12}, с = -За + ь. Найдите координаты и2длину вектора с.2. Напишите уравнение окружности с центром в точке M (1; -3),...
yanaskazka777
16.12.2021 03:39
Площадь боковой поверхности прямоугольного параллелепипеда равна 48 м квадрата при этом площадь одной боковой грани больше площади другой на 4 м квадрата. Чему равна...
19Викушка
16.01.2020 19:26
На рисунку BO=CO, AO=DO, AB=10cm. Доведіть що ABC=DCB, та знайдіть CD...
Ponomorev
15.04.2023 11:07
110,116,117,119 сделайте быстро...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var n := ReadInteger('n=');
ArrRandomInteger(n, 10, 99).Println;
for var i := 1 to n do
write(random(80) + 10, ' ');
end.