С Новым годом! Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 23.12.2011
Сообщений: 8

За какой срок сумма вложенных денег увеличиться не менее чем в K раз

27.01.2012, 00:31. Показов 1069. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Клиент поместил в банк S рублей. За год банк увеличивает сумму помещенных в него денег на P процентов. Написать программу, которая определит, за какой срок сумма вложенных денег увеличиться не менее чем в K раз.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
27.01.2012, 00:31
Ответы с готовыми решениями:

За какой срок сумма вложенных денег увеличится не менее чем в К раз при P% годовых.
Клиент поместил в банк S руб. За год банк увеличивает сумму помещенных в него денег на Р %. Написать программу, которая определит, за какой...

Написать программу, которая определит, за какой срок выплаченных арендатору денег составит заданную величину
Помогите пожалуйста, вот условия задачи: Клиент выплачивает арендную плату в размере S руб. в месяц. За пол года арендатор увеличивает...

Найти вероятность того, что событие А происходит: а)точно 220; б) менее чем 240 и более чем 100 раз.
В каждом из 500 независимых испытаний событие А происходит с постоянной вероятностью 0,4.Найти вероятность того, что событие А происходит:...

1
es geht mir gut
 Аватар для SoftIce
11274 / 4760 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
27.01.2012, 10:21
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Option Explicit
Dim S As Currency, P As Single, K As Single
Dim skokaLet As Single ' Сколько понадобится лет
Dim sumTek As Currency ' Сумма на счету
Dim sumGod As Currency ' На сколько увеличивается вклад в год
Private Sub Command1_Click()
   S = InputBox("Введите сумму", , 1000)
   P = InputBox("Введите проценты", , 7)
   K = InputBox("Во сколько раз должна увеличится сумма?", , 3)
   sumTek = S
   Do While sumTek < S * K
   sumGod = sumTek / 100 * P
   sumTek = sumTek + sumGod
   skokaLet = skokaLet + 1
   Loop
Print FormatCurrency(sumTek)
Print "Понадобится "; skokaLet; " Лет"    ' Сколько понадобится лет
End Sub
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
27.01.2012, 10:21
Помогаю со студенческими работами здесь

Найти вероятность того, что герб выпадет: 2 раза; не менее 2 раз; не более 2 раз; не менее одного и не более трех раз
Монету бросают 6 раз. Найти вероятность того, что герб выпадет: а) 2 раза; б) не менее 2 раз; в)не более 2 раз; г) не менее одного и не...

Напишите приложение, которое бы состояло не менее чем из 7 классов, расположенных в не менее чем 3-х пакетах
Необходимо написать приложение (программу), которое бы состояло не менее чем из 7 классов, расположенных в не менее чем 3-х пакетах. ...

Cформировать одномерный массив из элементов массива {X}, которые не менее чем в L раз превышают значения соседнего справа элемента
Собственно задача: Дан массив {X} размерностью n. Нужно: Cформировать одномерный массив {Y} размерностью k таким образом, чтобы он...

как в короткий срок заработать много денег
Обьясните пожалуйста как в короткие сроки можно зароботать много денег без вложения реала!или накрайняк как взломать чей нибудь кашелек!

Запрос на:Сколько денег было получено за некоторый срок
Сколько денег было получено за некоторый срок.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
изучаю kubernetes
lagorue 13.01.2026
А пригодятся-ли мне знания kubernetes в России?
сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
Модель микоризы: классовый агентный подход 3
anaschu 06.01.2026
aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ФедосеевПавел 06.01.2026
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .
Модель микоризы: классовый агентный подход 2
anaschu 06.01.2026
репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru