Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
pronikich
21.12.2021 10:45 •
Информатика
Дан массив l, содержащий 40 элементов в интервале от 10 до 50, замените первый и последний элементы массива. заранее буду , сделайте в паскале.
Показать ответ
Ответ:
ematrenichev
02.10.2020 23:28
Var a : array[1..n] of integer;
b,i : integer;
begin
Randomize;
for i:=1 to n do
begin
a[i]:=random(41)+10;
write(a[i],' ');
end;
writeln;
b:=a[1]; a[1]:=a[n]; a[n]:=b;
for i:=1 to n do write(a[i],' ');
writeln
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Enotiha217
06.10.2022 19:41
Что НЕ входит в основные инструменты SketchUp?...
arturshubin24
20.10.2022 15:21
5. Заполните ячейку У трассировочной таблицы, используя данные из проекта , я не селен в информатике....
Verka51
20.12.2022 10:34
Найдите четырехзначное число, две средние цифры которого образуют число, которое в 5 раз больше числа тысяч и в 3 раза больше числа единиц этого числа.Нужен код на языке паскаль...
zilga1
09.10.2021 15:35
Сколько времени потребуется для ввода в память компьютера текста на 58 страницах с сканера ипрограммы ABBYY FineReader, если известно, что на сканирование одной страницы уходит...
mandarinka3001
13.07.2020 12:36
Линейные алгоритмы Составит программу на С++ для вычисления значений функции Базовый уровень P = n√y³ + 1.09g Не смог писать код в программе Visual Studio 2019.....
lisska2
23.12.2021 21:06
18. Какие операции можно выполнять над векторными графическими изобра- жениями? (Выберите несколько вариантов ответа.)A) КопироватьВ) ВырезатьC) Вставить.D) Переместить.E) Удалить....
даsha3
19.07.2020 12:59
Берілген пиктограммалардын кызметін жазыңыз...
gordon5
09.06.2022 11:31
1. Объем сообщения – 1 Кбайт. Известно, что данное сообщение содержит 512 символов. Какова мощность алфавита? Выберите один ответ: a. 4 b. 6 c. 2 d. 8 2. Сообщение о том, что...
dashalev2510
11.08.2020 10:06
Почему колонки не и лампочки почему не все к колонкам ...
egorkovalev07ozgv8o
17.06.2022 06:57
20 кто правильно напишет ограничение по времени на тест1 секунда ограничение по памяти на тест256 мегабайт ввод стандартный ввод вывод стандартный вывод амира получила в подарок...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
b,i : integer;
begin
Randomize;
for i:=1 to n do
begin
a[i]:=random(41)+10;
write(a[i],' ');
end;
writeln;
b:=a[1]; a[1]:=a[n]; a[n]:=b;
for i:=1 to n do write(a[i],' ');
writeln
end.