Вопрос по информатике:
Дано трехзначное число вывести число полученное при перестановке цифр сотен и десятков исходного числа
Пожаловаться
- 15.11.2015 09:28
- Информатика
- remove_red_eye 5251
- thumb_up 20
Ответы и объяснения 1
Вот код программы:
Program Integer15;
var x,a,b,c,p:integer;
begin
writeIn('Введите число а');
readIn(x);
a:=x div 100;
b:=(x div 10)mod 10;
c:=x mod 10;
p:=b*100+a*10+c;
WriteIn ('Перестановленное местами =',p);
end.
Program Integer15;
var x,a,b,c,p:integer;
begin
writeIn('Введите число а');
readIn(x);
a:=x div 100;
b:=(x div 10)mod 10;
c:=x mod 10;
p:=b*100+a*10+c;
WriteIn ('Перестановленное местами =',p);
end.
Пожаловаться
- 16.11.2015 23:40
- thumb_up 29
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы