Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Mosi23
16.04.2023 13:49 •
Информатика
Напишите программу, которая будет формировать случайным образом и выводить на экран 5 чисел из отрезка {-10; 10} напишите программу, , !
Ответ:
lobanovartem2
07.10.2020 18:32
// PascalABC.NET 3.3, сборка 1623 от 16.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
SeqRandom(5,-10,10).Println
end.
Пример во вложении.
0,0
(0 оценок)
Ответ:
masha28122812
07.10.2020 18:32
Program Rick_and_Morty;
var x,a:integer;
Begin
a:=random(21)-10;
write('введите количество чисел: ');
readln (x);
while x>0 do
begin
a:=random(21)-10;
write(a,', ');
x:=x-1;
end;
writeln('');
writeln('конец');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
201102
02.01.2021 04:31
Із якою метою таблиці бажано створювати спочатку на папері...
АкоLove
15.07.2022 08:31
Составьте пpoгрaммy, кoтopaя Haйдёт cyммy oтpицaтeльныx элeмeнтoв тaблицы. Элeмeнты ввoдятcя пpи пoмoщи random от -42 до 85. Язык програмированния: Паскаль...
dadshka
09.11.2020 06:31
Составьте программу, заменяющую yes на no в предложении. !...
mr7ka
25.01.2023 11:05
Схема дорог, дорога от а до б 10км, найти номера пунктов соответствующие таблице...
mihajlovalena45
03.06.2023 00:33
Язык с++ A3. Количество элементов больших обоих соседейОграничение времени 1 секундаОграничение памяти 64MbВвод стандартный ввод или input.txtВывод стандартный вывод или output.txtДан...
countrestrikegl
11.12.2020 17:06
Информатика решить Информатизация представляет собой...
okm616
16.10.2022 21:07
Чему равно значение f(40)?...
NiceSaid
12.09.2022 02:44
введем выражение м и к обозначающие поразрядную конъюнкцию. определите наибольшее натуральное а, при котором выражение тождественно истинно...
shvartsberg111
18.11.2020 19:35
значение выражения записали в СС с основанием 7. найдите сумму цифр числа и запишите ответ в десятич. системе счисления...
даша3901
17.01.2021 09:43
Виктор составляет 4х буквенные коды из букв а р с е н и й. каждую букву можно использовать сколько угодно раз, код не может начинаться с й и должен содержать хотя бы одну гласную....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
SeqRandom(5,-10,10).Println
end.
Пример во вложении.
var x,a:integer;
Begin
a:=random(21)-10;
write('введите количество чисел: ');
readln (x);
while x>0 do
begin
a:=random(21)-10;
write(a,', ');
x:=x-1;
end;
writeln('');
writeln('конец');
end.