0 / 0 / 0
Регистрация: 15.09.2013
Сообщений: 23
1

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

12.02.2014, 18:56. Показов 17845. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
дано двузначное число.получить число образованное при перестановке цифр заданного числа.

Прошу вашей помощи с решением
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.02.2014, 18:56
Ответы с готовыми решениями:

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

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

Дано четырёхзначное число. Найти число, образованное обменом первой и второй пар цифр этого числа
Дано четырёхзначное число. Найти число, образованное обменом первой и второй пар цифр этого числа....

Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц
2. Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц...

6
3030 / 1916 / 1649
Регистрация: 30.04.2011
Сообщений: 3,060
12.02.2014, 20:54 2
Лучший ответ Сообщение было отмечено Lost_fk как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
var
  x: integer;
 
begin
  repeat
    Write('Введите двузначное число: ');
    Readln(x)
  until x in [10..99];
  Writeln(x mod 10, x div 10);
  Readln
end.
Добавлено через 29 минут
Ну, или так, чтобы не выводились числа типа 01, 02, ... , 09:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  x: integer;
 
begin
  repeat
    Write('Введите двузначное число: ');
    Readln(x)
  until x in [10..99];
  if x mod 10 <> 0 then
    Writeln(x mod 10, x div 10)
  else
    Writeln(x div 10);
  Readln
end.
2
Платежеспособный зверь
8835 / 4269 / 1621
Регистрация: 28.10.2009
Сообщений: 11,408
12.02.2014, 21:12 3
Цитата Сообщение от Kodzaev Посмотреть сообщение
Pascal
1
2
3
4
5
6
7
8
9
10
11
var
  x: integer;
 
begin
  repeat
    Write('Введите двузначное число: ');
    Readln(x)
  until x in [10..99];
  Writeln(x mod 10, x div 10);
  Readln
end.
Добавлено через 29 минут
Ну, или так, чтобы не выводились числа типа 01, 02, ... , 09:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  x: integer;
 
begin
  repeat
    Write('Введите двузначное число: ');
    Readln(x)
  until x in [10..99];
  if x mod 10 <> 0 then
    Writeln(x mod 10, x div 10)
  else
    Writeln(x div 10);
  Readln
end.
Не верно ни первое, ни второе. Получены две цифры, а не число.

Pascal
1
2
3
4
5
6
var
a:integer;
begin
readln(a);
writeln((a mod 10)*10+a div 10);
end.
0
1642 / 1091 / 487
Регистрация: 17.07.2012
Сообщений: 5,345
12.02.2014, 22:07 4
Цитата Сообщение от кот Бегемот Посмотреть сообщение
Получены две цифры, а не число.
Но ведь работает? Не ну вы правы, скорее всего по условию имеется ввиду получить само число в новой переменной. Но в условии не сказано этого...
1
Платежеспособный зверь
8835 / 4269 / 1621
Регистрация: 28.10.2009
Сообщений: 11,408
12.02.2014, 22:49 5
Цитата Сообщение от Новичок Посмотреть сообщение
Но ведь работает? Не ну вы правы, скорее всего по условию имеется ввиду получить само число в новой переменной. Но в условии не сказано этого...

Чего работает? Это задача для 6 класса. Цифры выделены и напечатаны? 2 и 5 - это не 25. Читайте условие:
получить число образованное при перестановке цифр
0
1642 / 1091 / 487
Регистрация: 17.07.2012
Сообщений: 5,345
12.02.2014, 23:05 6
Короче. Спор древний. Да, вы абсолютно правы: программа тупо выводит цифры числа в обратном порядке, но не само число. Просто на системах проверки (**** и других) вполне прокатит тупой вывод цифр. Ну наверно препод на такую программу скажет то же что и вы.
0
Платежеспособный зверь
8835 / 4269 / 1621
Регистрация: 28.10.2009
Сообщений: 11,408
12.02.2014, 23:18 7
Системы проверки отучают людей решать задачи, заменяя решение подгонкой под ответ, что никогда не приветствовалось
2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.02.2014, 23:18
Помогаю со студенческими работами здесь

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

Дано четырехзначное число. Найти число, получаемое при перестановке цифр
Дано четырехзначное число. Найти число, получаемое при перестановке 1 и 4 цифр и 3 и 2. Помогите...

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

Дано трехзначное число. Вывести число, полученное при перестановке цифр сотен и десятков
Дана трех значное число.вывести число,полученное при перестановки цифр сотен и десятков исходного...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru