Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
mitya0558dima1096
11.01.2022 10:08 •
Информатика
Напишите программу, которая будет формировать случайным образом и выводить на экран 5 чисел из отрезка {-10; 10} напишите программу, , !
Ответ:
kntalya
07.10.2020 18:32
// PascalABC.NET 3.3, сборка 1623 от 16.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
SeqRandom(5,-10,10).Println
end.
Пример во вложении.
0,0
(0 оценок)
Ответ:
lokosso
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 оценок)
Популярные вопросы: Информатика
fernandus
07.03.2020 08:55
Ввести два числа a и b.положительные числа уменьшить в 1,5 раза отрицательные -увеличить на 5. составить алгоритм в виде блок-схемы и программу....
milka20182
18.12.2020 23:52
К какой категории программного обеспечения относятся системы программирования?...
Ната911
20.03.2021 23:28
Разработать программу на языке программирования Pascal: sin (x)/5x + x3 - 2...
obuhovasveta
15.06.2022 14:30
Какая операция будет выполняться первой в выражении A∨A&F? A∨A A∨A&F A&F я тупик : )...
настя7063
16.10.2021 06:30
268: 2×1000.,824: 2 ×100.,3451×100-1398.,345×40+23100...
helena59365
23.11.2022 23:07
Composition my favourite means of communication the plan 1. different means of communication 2. communication in the past 3. your favourite means of communication and why ?...
котёнок130
23.11.2022 23:07
Найдите давление, которое оказывается 45г неона при температуре 0 градусов цельсия, если его объем составляет 1л. с !...
Аліна02012003
20.10.2021 02:58
Как решить уравнение 4*(3x-2)=5x+1...
Albina7890
23.11.2022 23:07
Сочинение на тему “компьютер в моей жизни: плюсы и минусы...
kiskammp014dd
23.11.2022 23:07
Подбери к данным словам однокоренные слова, которые обозначают признак предмета: скользить - робеть - резать - гладить - редеть - закрепить - ....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.