Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Кама29102007
24.02.2021 23:03 •
Информатика
Дан массив, состоящий из 8 случайных целых чисел -5 до 10, все его элементы уменьшить на число (а)( число "а" введите с клавиатуры)
Показать ответ
Ответ:
lgolar
04.10.2020 23:02
Var
a:integer;
b:array [1..8] of integer;
begin
readln(a);
for i:=1 to 8 do b[i]:=random(16)-5;
for i:=1 to 8 do b[i]:=b[i]-a;
for i:=1 to 8 do write(b[i],' ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
polinabaryshni
17.08.2021 16:33
1)объясните различие между коммуникационными и информационными службами сети?...
annar2001
01.07.2022 20:58
Составить программу в кумире для . введите числа a, b, n. если оба числа больше n, то напечатайте слово больше , если меньше n, то напечатайте меньше , иначе напечатайте n в промежутке...
hrndo
02.03.2021 07:22
Напишите как вы видите дальнейшее развитие 3D моделирования? (Своими словами)...
kristinakyzinae
15.01.2021 09:52
это решить,все с 5 задачи до 14...
NeZoXshock
22.04.2020 06:59
Некоторый алгоритм из одной цепочки символов получает новую цепочку следующим образом. Сначала вычисляется длина исходной цепочки символов; если она нечётна, то дублируется средний...
erro14
02.09.2020 23:19
Пользователь вводит три числа. Если сумма чисел кратна 5, выводится эта сумма, в противном случае – произведение чисел. написать програму на питоне...
аааа287
15.03.2021 05:50
Озин жазбагасын не айтам саган переырд...
Вадим363737466
15.03.2021 05:50
Священнослужитель, посредник между богами и людьми(4 буквы) религия, возникшая у первобытных племён и народов.(9 букв) обращение верующих к богу? (7 букв)...
AdamM2
15.03.2021 05:50
Составь предложения по данным схемам ....
макар95
15.03.2021 05:50
Мастер и маргарита. за что наказывает воланд и его свита, граждан москвы?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a:integer;
b:array [1..8] of integer;
begin
readln(a);
for i:=1 to 8 do b[i]:=random(16)-5;
for i:=1 to 8 do b[i]:=b[i]-a;
for i:=1 to 8 do write(b[i],' ');
end.