Як знайти першу цифру дробової частини
Завдання: Присвоїти змінній Z першу цифру із дробової частини дійсного числа K.
За допомогою Frac знаходжу залишок. Але ж він може бути будь-якої довжини! І тому застосувати DIV/MOD я не так просто не можу. Як визначити довжину залишку? Тобто. у чисел до нього вхідних.
1. Перша цифра дробової частини: Trunc(X * 10) mod 10
2. > Як визначити довжину залишку? Тобто. у чисел до нього вхідних.
Запитуючи, не підмінюйте первісну проблему придуманою.
Дякую. ))) Ви мене знову врятували.
> Задаючи питання, не підмінюйте первісну проблему придуманою.
Зі звичайних чисел, циферки відокремлював DIV/MOD"ами. )
Якого типу змінна?
Byte. Адже цифра одна )
> Pascal96 (17.11.09 8:51) [2]
Початкова проблема: як знайти першу цифру дрібної частини.ЦЯзавдання вирішується елементарно.
Ви запитали: як знайти довжину дрібної частини.ЦЯзавдання загального рішення немає взагалі.
Розумієте різницю? Ви придумали спочатку невірний спосіб вирішення і поставили не те питання, яке було. І якщо не заголовок топіка, то відповідь на запитання могла б бути тільки одна - ніяк.
Відомий вік мужика, і його 3-х синів. Який син старший за батька, але молодший за інших? Вивести результат приблизно так: "2-й син". Тобто. № номер сина.
> Byte. Адже цифра одна )Причому тоді FRAC
Не я мав на увазі, що в результаті цифру треба помістити в Z. А Frac бере участь у проміжних операціях.
про завдання, що стоїть та що виконується. http://gunsmoker.blogspot.com/2008/10/x-y-z.html
Я це читав. Тут інша тема. Тут я навів завдання загалом, сказав, що я зробив (використовуватиFrac). Так що, повз касу.
> Розумієте різницю? Ви придумали спочатку невірний спосіб рішення і задали не те питання, яке слід було. >І якщо не заголовок топіка, то відповідь на питання могла б бути тільки одна - ніяк. Юрій просто дуже швидко тебе "розкусив", і "щасливий кінець" настав буквально після першої відповіді. а от не було б зрозумілого заголовка, а лише питання з зовсім іншим завданням через посередництво якої ти намагався вирішити основну, і нічого не вийшло б, тобто все "в касу". краще б подумав і зробив висновки, ніж "відмазуватись".
Так, повторюю: Заголовок - це завдання загалом. Далі йде опис задачі. Тім, що я придумав і відповідні спливаючі по ходу справи суб-питання. Мені відразу ж пояснили, що я рухаюся не в той бік, тобто. моє рішення ВООБЗЕ не вірно і отже на виникаючі ТАМ питання не мають силу. А стаття про XYZ, початківці описують лише частину завдання.
Мене не цікавить Z І що ти збираєшся поміщати в Z адже існує безліч варіантів представлення дійсних чисел і що ти збираєшся поміщати наприклад для 0,001 в байт.
Var Z: byte; X: real; begin Z:= Trunc(X * 10) mod 10;
А я хотів якось так: Z:= (Frac(X). і щось там. Підсумок ціле число.
У мене нове завдання: (описано вище) Начебто просто, ан, щось бошка зовсім не варить ((((сьогодні).
З якого дива? Зліва ціле, а справа реальне, до того ж менше 0
> Відомий вік мужика, та його 3-х синів. > Який син старший за батька, але молодший за інших?Як син може бути старшим за батька?
> У мене нове завдання: (описано вище)Одна тема - одне повідомлення, дві теми - два повідомлення, три теми - ну тизрозумів.
> З якого дива? Зліва ціле, а справа реальне, до того ж менше > 0
Чому менше 0? Менше перші невірне?
Там, до речі, багатокрапка після Frac, тобто. далі йдуть якісь ще команди, в результаті яких має вийти ціле.
> Як син може бути старшим за батька?
Хм. А фіг його знає. ))) Завдання таке.
> Одна тема – одне повідомлення, дві теми – два повідомлення, три > теми - ну ти зрозумів.
Зрозумів. Але не хочу смітити на сайті. )))
> Відомий вік мужика, та його 3-х синів. > Який син старший за батька, але молодший за інших? > Вивести результат приблизно так: "2-й син". Тобто. №номер№ > сина.
Класична задача, написана тупим викладом, яка не має ні сенсу не розв'язання :D
Була отримана аналогічною переробкою, але, наприклад, з "зростанням", а не "віком", тобто. параметром, який розставляв би як Батько
> Класична задача, написана тупим викладом, що не має > ні сенсу не рішення :D
Нехай буде зростання. Так логічніше. ) По суті треба знайти сина який по зросту на трохи вище батька. Щось наздогнати не можу як вирішити. ( Сортування на MAX/MIN якось не хоче прикручуватися.
> Сортування на MAX/MIN якось не хоче прикручуватися.Затемнення мозку?
Знайти найменше із трьох чисел і порівняти його з четвертим - от і все. Як із цим можна не впоратися?
Щось погано здається.
Ну знаходжу я синові з найменшим росто і що? А якщо батько вище? То знову перебирати?
Якщо батько вищий, то рішення немає.
> Якщо батько вищий, то рішення немає.
Так. Я це мав на увазі. Так і виведу: "Батько вище всіх і на цьомукрапка".
Чи не обов'язково всіх.
> Як син може бути старшим за батька?
Може ви що серіалу "Термінатор" не дивіться? Дивіться 4 частину.
> Так і виведу: "Батько вищий за всіх і на цьому крапка".
Решта населення Землі не бере участь у завданні, залишимо.
Чому це? Вище за всіх синів.
Завдання немає рішення, якщо батько вище найнижчого сина, тобто. не обов'язково вище за всіх трьох.
> Завдання не має рішення, якщо батько вищий за найнижчий син, > тобто. не обов'язково вище за всіх трьох.
Як так? Добре, допустимо батько вище найнижчого сина, але це не означає, що він вище 2-х, що залишилися. Ось якщо він нижче за хоч одного, то рішення є.
> [33] Pascal96 (17.11.09 15:04) & gt; Ось якщо він нижче за хоч одного, то рішення є.От перший син - 150 см, другий - 170, третій - 180. А батько - 160. І яке ж рішення? Другий син вищий за батька, але він вищий за першого брата, тобто. не нижче за інших братів, як сказано в умові. Тобто. рішення в такому випадку немає. Рішення є, тільки якщо батько нижче всіх трьох синів.
Блін, я не правильно сформулював постановку задачі. Вибачайте, я в поспіху не так написав. Є батько і 3 сина. Потрібно знайти "номер" сина, який МІНІМАЛЬНО вище батька. е. він повинен бути "дрібним")))))
Наприклад батько 180, 1-й 100, 2-й-185, 3-й 300 (А що, багато каші їв)) Відповідь: "2-й син".