Не особо знаю паскаль, так что дабы не накосячить с синтаксисом, покажу на примере. Тут всё просто - тебе лишь нужен цикл For и расчет процентов.
FOR i = 1 TO 100 percents = FIX(x * p / 100) ' здесь у нас есть переменная percents, которой присваиваются округленные функцией fix проценты (насколько я знаю, в паскале аналогичная функция называется Round) x = x + percents 'тут всё понятно - переменной X присваивается она сама и годовые проценты по вкладу IF x >= y THEN 'проверяем, не равен или не превысил ли наш вклад ожидаемую сумму PRINT i 'в цикле For можно не заморачиваться с отслеживанием лет, переменная i сама подсчитает количество итераций-лет END 'завершаем программу END IF NEXT i ' конец цикла Можно ещё чисто для себя добавить в условие вывод переменной X, чтобы было нагляднее.
Одна из простейших игр со стратегией, разновидность игры "Ним". Игра под названием "Кто первый скажет "Сто"?" Чтобы первым достичь 100, надо заставить противника при его последнем ходе назвать число 90 до 99 - прибавив к этому числу от 10 до 1, мы выигрываем. Следовательно, при своем предпоследнем ходе, мы должны назвать число 89=100-(10+1). Перед этим надо назвать числа 89-11=78, 67, 56, 45, 34, 23, 12, 1. Начальное число 1 можно найти сразу как остаток от целочисленного деления 100 на 11. А далее делать шаги по указанным цифрам. Для этого, если противник прибавляет некое m, надо прибавлять 11-m. Или, ничего не считая, называть числа 1, 11+1=12, 12+11=32, .. 87 и 100.
В общем виде, если требуется первым назвать число N, используя числа от 1 до m, начальное число определяем, как остаток деления N на (m+1). А далее, когда противник прибавляет некое k, мы прибавляем m+1-k.
ПРИЧИНЫ создания моделей:
В реальном времени оригинал уже не существует или его нет в действительности. ...
Оригинал может иметь много свойств и взаимосвязей. ...
Оригинал либо очень велик, либо очень мал. ...
Исследование объекта может привести к его разрушению.