Задача: Growth of a Population

Запись от alhaos размещена 01.08.2021 в 12:27

Показов 3569 Комментарии 2

Метки powershell

(с) https://www.codewars.com/kata/... b5120000c6

In a small town the population is p0 = 1000 at the beginning of a year. The population regularly increases by 2 percent per year and moreover 50 new inhabitants per year come to live in the town. How many years does the town need to see its population greater or equal to p = 1200 inhabitants?

At the end of the first year there will be:
1000 + 1000 * 0.02 + 50 => 1070 inhabitants

At the end of the 2nd year there will be:
1070 + 1070 * 0.02 + 50 => 1141 inhabitants (** number of inhabitants is an integer **)

At the end of the 3rd year there will be:
1141 + 1141 * 0.02 + 50 => 1213

It will need 3 entire years.
More generally given parameters:

p0, percent, aug (inhabitants coming or leaving each year), p (population to surpass)

the function nb_year should return n number of entire years needed to get a population greater or equal to p.

aug is an integer, percent a positive or null floating number, p0 and p are positive integers (> 0)

Examples:

Code
1
2
nb_year(1500, 5, 100, 5000) -> 15
nb_year(1500000, 2.5, 10000, 2000000) -> 10

Note:
Don't forget to convert the percent parameter as a percentage in the body of your function: if the parameter percent is 2 you have to convert it to 0.02.

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
$DebugPreference = "continue"
 
class Arge {
    static [int] NbYear([int] $p0, [double] $percent, [int] $aug, [int] $p) {
        $percent *= .01
        for ($i = 1; $true ; $i++){
            Write-Debug ("Year: {4,3}, p0: [{0}], percent: [{1}], aug: [{2}], p: [{3,15}], calc: {0}+{0}*{1}+{2}={3}" -f $p0, $percent, $aug, ($p0 + $p0 * $percent + $aug), $i)
            $p0 = $p0 + [Math]::Floor($p0 * $percent) + $aug
            if ($p0 -ge $p){
                return $i
            }
        }
        return -1
    }
}
 
[Arge]::NbYear(1500000, 2.5, 10000, 2000000)

Code
1
2
3
4
5
6
7
8
9
10
11
DEBUG: Year:   1, p0: [1500000], percent: [0,025], aug: [10000], p: [        1547500], calc: 1500000+1500000*0,025+10000=1547500
DEBUG: Year:   2, p0: [1547500], percent: [0,025], aug: [10000], p: [      1596187,5], calc: 1547500+1547500*0,025+10000=1596187,5
DEBUG: Year:   3, p0: [1596188], percent: [0,025], aug: [10000], p: [      1646092,7], calc: 1596188+1596188*0,025+10000=1646092,7
DEBUG: Year:   4, p0: [1646093], percent: [0,025], aug: [10000], p: [    1697245,325], calc: 1646093+1646093*0,025+10000=1697245,325
DEBUG: Year:   5, p0: [1697245], percent: [0,025], aug: [10000], p: [    1749676,125], calc: 1697245+1697245*0,025+10000=1749676,125
DEBUG: Year:   6, p0: [1749676], percent: [0,025], aug: [10000], p: [      1803417,9], calc: 1749676+1749676*0,025+10000=1803417,9
DEBUG: Year:   7, p0: [1803418], percent: [0,025], aug: [10000], p: [     1858503,45], calc: 1803418+1803418*0,025+10000=1858503,45
DEBUG: Year:   8, p0: [1858503], percent: [0,025], aug: [10000], p: [    1914965,575], calc: 1858503+1858503*0,025+10000=1914965,575
DEBUG: Year:   9, p0: [1914966], percent: [0,025], aug: [10000], p: [     1972840,15], calc: 1914966+1914966*0,025+10000=1972840,15
DEBUG: Year:  10, p0: [1972840], percent: [0,025], aug: [10000], p: [        2032161], calc: 1972840+1972840*0,025+10000=2032161
10

Метки powershell

Размещено в Без категории

« Задача: Playing with digits Главная страница Задача: Human Readable Time »

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

Всего комментариев 2

Комментарии

	Do not they die?
	Запись от Elmar_Velihanov размещена 01.08.2021 в 18:12

	everyone will die in the end
	Запись от alhaos размещена 02.08.2021 в 09:09

alhaos

Регистрация 20.02.2019
Адрес Пыть-Ях
Сообщений 2,675
Записей в блоге 77

Новые блоги и статьи Все статьи Все блоги /
Когда логика программы не спасает от человеческих ошибок Maks 18.08.2026 В последнее время всё чаще и чаще сталкиваюсь с таким явлением, как абсолютная невнимательность (или глупость) пользователей. Проявляется это чаще всего на работе в коллективе. Допустим, человек с. . .	Лето уходит kumehtar 17.08.2026	Мысли в слух kumehtar 17.08.2026 Забавно, насколько сейчас стала доступна информация. Например о магии, духовном развитии, медитациях, и других подобных направлениях, ранее зачастую тайных, передаваемых от учителя к ученику. Хотя. . .	Перемещение строк из ТЧ в другой документ с учетом текущего пробега Maks 17.08.2026 Реализация из решения ниже выполнена на примере нетипового документа "Автозапчасти", с ТЧ "Шины". За основу взят алгоритм отсюда: https:/ / www. cyberforum. ru/ blogs/ 359708/ 10838. html Задача: . . .
Саморегулирующийся социальный контракт для сервера cross-section. Hrethgir 14.08.2026 С кодом конечно таких глубоких размышлений пока не было, впрочем я уже привык к алгоритмизации. Суть предмета записи: снова в диалоге с нейросетью (я взял пока себе ник для учётки админа - Rector). . . .	Часы электронные Uhbif79 12.08.2026 Выкладываю программу часов. Программа позволяет: 1. Использовать системное время и дату, 2. Есть возможность вводить время и дату вручную. 3. Реализованы 2 будильника: начало и конец рабочего дня. . . .	Часы с будильником на основе класса QLCDNumber Uhbif79 12.08.2026 Всем добрый день, выкладываю программу часов с будильником на основе класса QLCDNumber. Здесь я пробовал самостоятельно создавал классы, впервые столкнулся с видимостью переменной одного класса из. . .	Установка MinGW GCC 16.2 и CMake 8Observer8 10.08.2026 VK Видео: https:/ / vkvideo. ru/ video-240781534_456239017 YouTube: eY5-5PyI9NM Текстовая версия

Наверх

Сообщение форума

Отменить изменения