Вопрос по информатике:
Помогите с Паскалем!
С клавиатуры вводится четырехзначное натуральное число. Поменяйте в нем местами первую цифру со второй и третью с четвертой. Затем результат надо вывести на экран. Оператор вывода в программе должен быть единственным и выглядеть так: writeln(y)
- 26.10.2017 09:52
- Информатика
- remove_red_eye 5948
- thumb_up 14
Ответы и объяснения 1
a,b,c,d:integer;
Begin
readln(n);
a:= n div 1000;
b:= n div 100 - a * 10;
c:= n div 10 - a * 100 - b * 10;
d:= n mod 10;
y:= b*1000 + a*100 + d*10 + c;
writeln(y);
end.
Пример: 4295 (5290)
Вывод: 2459 (2509)
- 27.10.2017 13:27
- thumb_up 28
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.