Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
msvladimirovnalena
08.03.2022 09:26 •
Информатика
Заполнить массив случайными числами от 1 до 30. заменить все элементы массива их удвоенными значениями
Показать ответ
Ответ:
snyaSergeeva
26.08.2020 19:32
Var i,n:integer;
a:array[1..1000] of integer;
begin
write('Write size array: '); readln(n);
for i:=1 to n do
begin
a[i]:=Random(30);
write(a[i]:4,' ');
end;
writeln;
for i:=1 to n do
begin
a[i]:=a[i]*2;
write(a[i]:4,' ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Ука12345
19.02.2021 16:00
Страница текста содержит 40 строк по 50 символов в каждой. сообщение, состоящее из 10 страниц текста, имеет информационный объём 12500 байтов. какова мощность алфавита?...
Eldhei
17.03.2020 19:47
решить задачу в Excel...
zuhranormatova0
30.04.2022 04:05
Удалить из бинарного дерева ветвь с вершиной, имеющей заданный ключ C++...
lashina90
12.01.2020 12:31
Столицей великого княжества литовского стал город: а) рига б) вильно в) ревель г) гродно...
Alniri
12.01.2020 12:31
Утюркських мовах це слово означало ,ледар, та,гульвіса,тож напевно цей український магнат і князь із старовинного роду гедиміновичів був би вельми ображений якби почуві...
NuznaPomojs
12.01.2020 12:31
На верхней книжной полке у бухгалтера веры соломоновны ёксель стоит «капитал» карла маркса (в пересказе для детей – иначе слишком большие числа получатся). это целых...
симон8
12.01.2020 12:31
Выделительная система круглых червей...
MilkiWika
12.01.2020 12:31
Визбытке соляной кислоты растворили цинк массой 13 г и магний массой 2,4. какой объем водорода выделившегося при этом...
sonasandimirova
12.01.2020 12:31
Моторная лодка км по течению реки и 6км против течения,затратив на весь путь 4ч. какова скорость лодки в стоячей воде,если скорочть течения реки равна 3км/ч...
jixeli
12.01.2020 12:31
Пришвин сказка- быль кладовая солнца примеры из текста эпититов, олицетворений и сравнений...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a:array[1..1000] of integer;
begin
write('Write size array: '); readln(n);
for i:=1 to n do
begin
a[i]:=Random(30);
write(a[i]:4,' ');
end;
writeln;
for i:=1 to n do
begin
a[i]:=a[i]*2;
write(a[i]:4,' ');
end;
end.