Вопрос по информатике:
Составьте программу, которая заполняет массив а[1..10] случайными целыми числами в диапозоне от 1 до 10, затем меняет местами первый элемент со вторым, третий с четвертым и тд. Выведите на экран исходный и полученный массивы.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 12.04.2018 01:06
- Информатика
- remove_red_eye 9871
- thumb_up 9
Ответы и объяснения 1
// Внимание! Если программа не работает, обновите её версию!
begin
var a:=ArrRandom(10,1,10); a.Println;
var i:=0;
while i<=9 do begin
Swap(a[i],a[i+1]);
i+=2
end;
a.Println
end.
Пример
5 1 7 3 6 3 9 1 3 8
1 5 3 7 3 6 1 9 8 3
- 13.04.2018 01:56
- thumb_up 41
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.