|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/371.32 18 Dec 2000 13:25:58
To : Ace
Subject : Re: Модуль или подобное...
--------------------------------------------------------------------------------
В твоём письме от Sat, 16 Dec 2000 15:48:24 +0300 написано:
EVS>> Существует ли в Perl функция, вычисляющая максимальное положительное В,
EVS>> при котором A/B>0, где A>B>0. И где почитать про модули?
alr> Ладно, ошибся, не все дописал: вариант A/B должен быть целым числом, а не
alr> дробным; и A, и В при этом тоже целые числа. Пример: для A=5, B=2, бо
alr> A/B=5, остаток=1; для A=8, B=4, бо A/B=2; для A=13, B=6, бо A/B=2,
alr> остаток=1. Hужна функция, делающая это. Пардон, что в первый раз
alr> недописал.
Тогда sub { return $_[0]-1 }. Если A>B, то A/B>0 и при делении нацело тоже. Ты
вообще в школе учился?
--- slrn/0.9.6.3-as (Linux)
* Origin: AKA с подствольным плюсомётом (2:5020/371.32)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
