0 / 0 / 0
Регистрация: 23.11.2012
Сообщений: 12

Описать процедуру, переставляющую в натуральном числе цифры с номерами n и m

08.11.2013, 17:25. Показов 1271. Ответов 10
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Описать процедуру, переставляющую в натуральном числе цифры с номерами n и m.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
08.11.2013, 17:25
Ответы с готовыми решениями:

Найти в натуральном числе нечётные цифры и вывести 1 и последнюю цифры
Дано натуральное число, найти: 1. количество нечётных цифр 2. вывести первую и последнюю цифры данного числа

Цифры в натуральном числе
Помогите плиз решить следующую задачку: "Дано натуральное число. Определить, образуют ли цифры числа арифметическую прогрессию "

В натуральном числе переставить цифры
В натуральном числе переставить цифры таким образом, чтобы образовалось наименьшее число, записанное этими же цифрами

10
Почетный модератор
 Аватар для ildwine
6201 / 2963 / 1300
Регистрация: 04.03.2013
Сообщений: 5,797
Записей в блоге: 1
08.11.2013, 17:52
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
procedure move(n, m : word; var z : word);
var s : string;
    b : integer;
    t : char;
begin
  str(z, s);
  t := s[n];
  s[n] := s[m];
  s[m] := t;
  val(s, z, b)
end;
1
 Аватар для Dj Programmer
14 / 14 / 14
Регистрация: 05.10.2013
Сообщений: 141
08.11.2013, 18:21
ildwine, зачем в скобках мы пишем var ?
0
Почетный модератор
 Аватар для ildwine
6201 / 2963 / 1300
Регистрация: 04.03.2013
Сообщений: 5,797
Записей в блоге: 1
08.11.2013, 18:22
Dj Programmer, var говорит, что параметр изменяемый, результат работы процедуры запишется в тот же параметр. Если его убрать, строка 10, вызовет ошибку...
0
 Аватар для Dj Programmer
14 / 14 / 14
Регистрация: 05.10.2013
Сообщений: 141
08.11.2013, 18:24
Все равно не понял , можно на примере объяснить , в чем отличие
Pascal
1
procedure move(n, m : word; var z : word);
от

Pascal
1
procedure move(n, m, z  : word;);
????????
0
Почетный модератор
 Аватар для ildwine
6201 / 2963 / 1300
Регистрация: 04.03.2013
Сообщений: 5,797
Записей в блоге: 1
08.11.2013, 18:26
В первом случае: можно изменить значение параметра z внутри процедуры, во втором - он константа, и присвоение ему значения вызовет ошибку.
1
 Аватар для Dj Programmer
14 / 14 / 14
Регистрация: 05.10.2013
Сообщений: 141
08.11.2013, 18:28
Спасибо , теперь понял
0
Почетный модератор
 Аватар для ildwine
6201 / 2963 / 1300
Регистрация: 04.03.2013
Сообщений: 5,797
Записей в блоге: 1
08.11.2013, 18:28
В нашем примере мы передаем n и m как параметры-значения (которые только считываются), а z как параметр-переменную, значение которого изменится в процессе работы процедуры и заменится на переменную, подставленную в основной программе при вызове.
0
 Аватар для Dj Programmer
14 / 14 / 14
Регистрация: 05.10.2013
Сообщений: 141
08.11.2013, 18:31
ildwine, то есть , при вызове процедуры будут вводится только два параметра , а 3-й будет зависеть от первых двух ?
0
Почетный модератор
 Аватар для ildwine
6201 / 2963 / 1300
Регистрация: 04.03.2013
Сообщений: 5,797
Записей в блоге: 1
08.11.2013, 18:35
При вызове процедуры мы передадим номера цифр, которые надо сменить и число a:
Pascal
1
move(1,2,a);
после выполнения в число a передастся значение внутреннего параметра z, которое равно числу a c переставленными 1 и 2 цифрами.

Добавлено через 2 минуты
Если бы была функция, то ее имя бы само возвращало значение
Pascal
1
function z (n, m, a : word) : word;
1
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33421 / 21527 / 8240
Регистрация: 22.10.2011
Сообщений: 36,933
Записей в блоге: 12
09.11.2013, 02:19
Цитата Сообщение от ildwine Посмотреть сообщение
во втором - он константа, и присвоение ему значения вызовет ошибку.
В Паскале? Не вызовет, менять значение можно, только вот туда, откуда процедура была вызвана, не будет передано измененное значение (фактически, и при Var туда ничего не передается, но если в процедуру передать Var-параметр, то туда уходит ссылка на переменную, а не ее значение, процедура работает с тем значением, на которое эта ссылка ссылается, и, разумеется, после того, как значение по ссылке было изменено - оно изменено везде, что в процедуре, что в вызывающей программе. Ибо изменен первоисточник. В случае без Var передается значение, ты можешь его менять, но вот при завершении процедуры все то, что было изменено в ней - теряется, вызывающая программа ничего о произведенных изменениях не знает...)

Чтобы была ошибка при попытке изменения переданного параметра - надо описать его со спецификатором Const...
2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
09.11.2013, 02:19
Помогаю со студенческими работами здесь

Определить, есть ли в натуральном числе цифры а и b
Доброго времени суток! Помогите решить задание на с#: Дано натуральное число. Определить, есть ли в нем цифры а и b. Как я понял,...

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

В любом натуральном числе поменять местами цифры
Мне надо в любом натуральном числе,поменять местами цифры.Я написал вот такую программу,но она не работает,почему? #include...

Проверить, что в натуральном числе встречаются цифры А и В.
Помогите пожалуйста решить задачу, буду весьма признателен. Проверить, что в натуральном числе встречаются цифры А и В.

В четырехзначном натуральном числе определить наименьшую и наибольшую цифры
привет всем!Кто сможет мне помочь,очень нужно,я новичок совсем в с# и мне нужно сделать вот такое задание 1. В четырехзначном(!)...


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

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

Новые блоги и статьи
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определенном условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru