Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
SweetCandy23228
09.12.2021 00:26 •
Информатика
1.задать массив м(9) случайными числами от 21 до 47. 2.уменьшить на 3 элементы массива. 3.увеличить на 50 элементы массива.
Показать ответ
Ответ:
Kg1
20.08.2020 06:49
Var
a:array[1..9] of integer;
i:integer;
begin
for i:=1 to 9 do
begin
a[i]:=random(26)+21;
write(a[i]," ");
end;
writeln();
for i:=1 to 9 do
begin
a[i]:=a[i]-3;
write(a[i]," ");
end;
writeln();
for i:=1 to 9 do
begin
a[i]:=a[i]+50;
write(a[i]," ");
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
daniiltarasenko9
04.02.2020 09:17
В электронную таблицу занесли результаты тестирования учащихся по русскому языку и математике. На рисунке приведены первые строки получившейся таблицы. Pau С А сама...
maratizmailov
30.08.2022 13:09
Для вставки звука можно использовать : текст, символ, мультимедиа ...
dashab1212200
02.04.2021 20:52
Решите задачу. Два игрока играют в следующую игру. Перед ними лежат две кучки камней, в первой – 2 камня, а во второй – 4 камня. У каждого игрока неограниченно много...
СуПерБро123
16.07.2020 21:27
Что есть в растровом редакторе Gimp, но нет в растровом редакторе Paint?...
igorelon
10.02.2022 08:26
Нужна с составлением алгоритмов...
natalyater1
04.03.2022 05:02
Каковы были цели походов монголов? были ли они осуществлены?...
pat05453
04.03.2022 05:02
Какие буквы ты напишешь на месте пропусков? выпиши слова 1) безударными гласными в оканчаниях существительных; 2) с безударными гласными в корне, проверяемые ударением;...
aitxam
04.03.2022 05:02
Дождь шёл целую ночь и напоил сухую землю. разобрать по падежам все существительные...
Darieva
04.03.2022 05:02
старое дерево трещит, а зеленое летит значение этой пословицы...
3035111236
04.03.2022 05:02
На чьей стороне автор в рассказе муму...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a:array[1..9] of integer;
i:integer;
begin
for i:=1 to 9 do
begin
a[i]:=random(26)+21;
write(a[i]," ");
end;
writeln();
for i:=1 to 9 do
begin
a[i]:=a[i]-3;
write(a[i]," ");
end;
writeln();
for i:=1 to 9 do
begin
a[i]:=a[i]+50;
write(a[i]," ");
end;
end.