Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.56/9: Рейтинг темы: голосов - 9, средняя оценка - 4.56
0 / 0 / 0
Регистрация: 06.02.2014
Сообщений: 65
1

Дано целое двухзначное число a. Получить удвоенное значение наименьшего числа, которое можно получить из цифр заданного числа a

11.02.2014, 18:18. Просмотров 1888. Ответов 1
Метки нет (Все метки)


Дано целое двухзначное число a. Получить удвоенное значение наименьшего числа, которое можно получить из цифр заданного числа a.
Входные данные:
Во входном потоке записано единственное целое двухзначное число.

Выходные данные:
В выходной поток вывести единственное целое число.

Пример входного файла (input.txt):
48
Пример выходного файла (output.txt):
96
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.02.2014, 18:18
Ответы с готовыми решениями:

Дано целое двухзначное число a. Получить наибольшее число, которое можно получить из цифр числа a
Дано целое двухзначное число a. Получить наибольшее число, которое можно получить из цифр числа a....

Дано двухзначное число. Получить число, образованное при перестановке цифр заданного числа
Дано двухзначное число. Получить число, образованное при перестановке цифр заданного числа.

Дано целое трехзначное число a. Получить утроенное значение числа, состоящего из цифр числа a, записанных в неубывающем порядке
Дано целое трехзначное число a. Получить утроенное значение числа, состоящего из цифр числа a,...

Дано целое трехзначное число a. Получить утроенное значение числа, состоящего из цифр числа a, записанных в неубывающем порядке
Дано целое трехзначное число a. Получить утроенное значение числа, состоящего из цифр числа a,...

1
191 / 161 / 116
Регистрация: 14.09.2013
Сообщений: 302
11.02.2014, 18:26 2
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
var
  a, a1, a2: integer;
begin
  readln(a);
  a1 := a div 10;
  a2 := a mod 10;
  if a < a2 * 10 + a1
    then writeln(a * 2)
    else writeln((a2 * 10 + a1) * 2)
end.
3
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.02.2014, 18:26

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Дано целое трехзначное число a. Получить утроенное значение числа, состоящего из цифр числа a, записанных в невозрастающем порядке
Дано целое трехзначное число a. Получить утроенное значение числа, состоящего из цифр числа a,...

Получить удвоенное значение числа, состоящего из цифр числа a, записанных в неубывающем порядке
Дано целое двухзначное число a. Получить удвоенное значение числа, состоящего из цифр числа a,...

Получить удвоенное значение числа, состоящего из цифр числа a, записанных в невозрастающем порядке
Дано целое двухзначное число a. Получить удвоенное значение числа, состоящего из цифр числа a,...

Получить удвоенное значение числа, состоящего из цифр числа a, записанных в неубывающем порядке
Дано целое двухзначное число a. Получить удвоенное значение числа, состоящего из цифр числа a,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.