катерина424
10.04.2020 17:31

Одномерный массив из 7 элементов заполнить случайным образом числами от 1 до 15.преобразовать массив таким образом,чтобы каждому элементу присваивалось значение предыдущего,при этом первому элементу должно присвоиться значение последнего элемента таблицы. вывести на экран монитора первоначальный и преобразованный массивы в столбик(столбики должны быть расположены рядом).

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
monkeyone
13.07.2020 10:44
Var
  a,b:array[1..7]of integer;
  i:integer;
begin
for i:=1 to 7 do  a[i]:=random(15)+1;
b[1]:=a[7];   
for i:=2 to 7 do  b[i]:=a[i-1];
for i:=1 to 7 do   writeln(a[i]:4,b[i]:4);
end.  
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота