Вопрос по информатике:
Создайте программу, которая запрашивает значения 5 переменных и организует циклический обмен. a1<-a2,a2<-a3..a5<-a1. Пример: 1 2 3 4 5. После обмена: 2 3 4 5 1
Пожаловаться
- 24.04.2015 23:09
- Информатика
- remove_red_eye 16837
- thumb_up 47
Ответы и объяснения 1
Var
a1,a2,a3,a4,a5,B:real;
Begin
Write('Введите пять чисел: ');
ReadLn(a1,a2,a3,a4,a5);
B:=a1;
a1:=a2;
a2:=a3;
a3:=a4;
a4:=a5;
a5:=B;
WriteLn(a1,' ',a2,' ',a3,' ',a4,' ',a5);
End.
a1,a2,a3,a4,a5,B:real;
Begin
Write('Введите пять чисел: ');
ReadLn(a1,a2,a3,a4,a5);
B:=a1;
a1:=a2;
a2:=a3;
a3:=a4;
a4:=a5;
a5:=B;
WriteLn(a1,' ',a2,' ',a3,' ',a4,' ',a5);
End.
Пожаловаться
- 25.04.2015 05:11
- thumb_up 6
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы