Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
peindragneel11
28.02.2022 23:59 •
Информатика
Сдвинуть все элементы массива на одну позицию вправо (циклически). последний элемент должен оказаться на месте первого.в паскале
Показать ответ
Ответ:
mario160
04.10.2020 00:49
Var i:integer;
x:array[1..5]of integer;
begin
for i:=1 to 5 do
begin
if i<>5 then read(x[i+1])
else read(x[1]);
end;
end.
Самое простое решение-считывать сразу в сдвинутом состоянии.
0,0
(0 оценок)
Популярные вопросы: Информатика
elenabeloglazo
10.10.2021 21:05
Нужно составить блок-схему для решения функции: y = sqrt(3)*( arctg(x/sqrt(3)) + ln(x-sqrt(3) / x+sqrt(3)) ) Фото для наглядности: https://prnt.sc/v9iprx...
tolikbn85
05.01.2020 15:39
При какой клавиши можно преобразовать относительный адрес ячейки в абсолютный? a) f1 b) f2 c) f3 d) f4...
germanbet
05.01.2020 15:39
Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник может выполнять команду сместиться на (a, b) (где a, b – целые числа), перемещающую...
kavaii29
05.01.2020 15:39
Что относится к смешанным информационным моделям...
mihksy17
06.04.2022 10:56
Компьютерге түсінікті тілде жазылған алгоритм...
LisenokLove2003
03.02.2022 19:30
В ячейке d2 находится формула $D$3+8 её скопировали в ячейку А3 какое значение будет В ячейки H10 записана формула*C$5*F*5 Её перенесли в Ячейки E8 какой вид будет иметь формула...
on82
11.02.2020 12:52
Скорость обработки информации в компьютере зависит: от ВЗУ от ОЗУ от тактовой частоты от жесткого диска...
Sudzuky
06.05.2021 07:15
Рассмотрите рисунок, найдите и запишите в тетради, какие устройства можно подключить к компьютеру через порты. Очень нужно...
goodman91
11.04.2023 10:37
Верно ли равенство 173¹⁰=AB¹⁶?...
Ежевичка1111
05.12.2022 04:43
Заполните таблицу. Эра, продолжительность. Начало эры (сколько лет назад). Особенности. Пример: много воды, жизнь в воде и т. д. . Бл засунул в информатику...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
x:array[1..5]of integer;
begin
for i:=1 to 5 do
begin
if i<>5 then read(x[i+1])
else read(x[1]);
end;
end.
Самое простое решение-считывать сразу в сдвинутом состоянии.