Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перевернутые числа

R0k © (2009-05-16 23:50:00)
Здравствуйте! Нужно написать функцию которая бы брала целое число как параметр и возвращала его зеркальный вариант, т.е. порядок цифр обратный. (примечание: все вычисления должны делаться в числовой форме, стринги запрещены). пример: число 1234 -> 4321
700 -> 7

R0k (2009-05-17 15:14:00) [1]
спасибо!

antonn (2009-05-17 13:23:00) [2]

> А нужно ли было вообще что- то давать автору, который привёл
> "явно учебную задачу" и хотел получить готовое решение ничего
> не делая сам?

слава богу ответы на эти вопросы не регламентируются правилами, каждый участник сам решит "нужно или нет".

Германн (2009-05-17 01:59:00) [3]

> Игорь Шевченко © (17.05.09 01:47) [5]
>
>
> > Нужно написать функцию которая бы брала целое число как
> > параметр и возвращала его зеркальный вариант
>
>
> Напиши.
>

И получишь пятёрку! Или четвёрку. Но и четвёрка тоже неплохо!
Даже и тройку я бы посчитал достойным результатом. Но в некоторых особых ситуациях.

Игорь Шевченко (2009-05-17 01:47:00) [4]

> Нужно написать функцию которая бы брала целое число как
> параметр и возвращала его зеркальный вариант

Напиши.

Германн (2009-05-17 01:17:00) [5]

> AndreyV © (17.05.09 01:02) [3]

А нужно ли было вообще что- то давать автору, который привёл "явно учебную задачу" и хотел получить готовое решение ничего не делая сам?

AndreyV (2009-05-17 01:02:00) [6]
> [2] Германн © (17.05.09 00:47)
> 1. В сабже не указана система счисления.

Я решил не уточнять, ибо привёл лишь подход

> 2. Учебные задания нужно выполнять самому.

Хотел написать четыре оператора, но получилось более развёрнуто.:)

Германн (2009-05-17 00:47:00) [7]

> AndreyV © (16.05.09 23:57) [1]
>
> В цикле пока src > 0
> rev := rev * 10 + (src mod 10);

1. В сабже не указана система счисления.
2. Учебные задания нужно выполнять самому.
:)

AndreyV (2009-05-16 23:57:00) [8]
В цикле пока src > 0
rev := rev * 10 + (src mod 10);
src := src div 10;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »