Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.92/13: Рейтинг темы: голосов - 13, средняя оценка - 4.92
Anthea
1

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

16.09.2014, 21:32. Показов 2435. Ответов 2
Метки нет (Все метки)

Взят заем в банке 10000 р под 7% годовых на 5 лет. Написать программу, которая подсчитывает сколько нужно платить ежемесячно.

Помогите, пожалуйста. Только начал изучать и не совсем поняла, то ли я делаю или нет.
Миниатюры
Написать программу для подсчета ежемесячного платежа при заеме в банке  
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.09.2014, 21:32
Ответы с готовыми решениями:

Рассчитать величину ежемесячного платежа
Рассчитать величину ежемесячного платежа для погашения ипотечного кредита на приобретение квартиры...

Программа расчета суммы ежемесячного платежа
Банк выдает ссуды гражданам на L лет под G% годовых на приобретение недвижимости. Должник обязан...

Нужна формула расчета ежемесячного платежа по ипотеке
Как записать правильно формулу расчета ежемесячного платежа по ипотеке, если использовать следующие...

Написать программу для подсчёта цифры
Добрый день господа. Мне необходима Ваша помощь для написание небольшой программы, которая сможет...

2
Фрилансер
3411 / 2808 / 3000
Регистрация: 08.02.2012
Сообщений: 8,029
Записей в блоге: 1
17.09.2014, 13:35 2
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
y:=(a+a*b*c)/(d*c);
Вроде так
0
33 / 33 / 43
Регистрация: 07.02.2014
Сообщений: 89
17.09.2014, 13:41 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Program Bank;
uses crt;
var
a,b,c,d,y,prc,kolprc,Symma : real;
kl : char;
BEGIN
clrscr;
Repeat
GOTOXY(1,1);
Write('Выберите сумму кредита : ');clreol;
Read(a);
b:=7;  { Процент в год }
c:=5;  { Время на оплату кредита в годах }
d:=12; { Количество месяцев в году }
prc:=(a*7)/100; { Находим сумму 7 процентов от всего кредита}
kolprc:=prc*c; { Считаем сумму процентов за 5 лет }
Symma:=a+kolprc; { Суммируем кредит с процентами за 5 лет }
y:=Symma/(c*d);
Write('7 процентов от ',a:0:2,' = ',prc:0:2);clreol;writeln;
Write('Всего процентов за 5 лет = ',kolprc:0:2);clreol;writeln;
Write('При сумме ',a:0:2,' и ',b:0:0,' процентах в год итоговая сумма = ',Symma:0:2);clreol;
WriteLn;
Write('Ежемесячный платёж за ',c:0:0,' лет составит : ',y:0:2 );clreol;
kl:=readkey;
if kl=#27 then exit; { Выход из программы по клавише Esc}
Until keypressed
END.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.09.2014, 13:41

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Написать программу для подсчета суммы
Для заданного натурального n и действительного х подсчитать слейдующюю сумму: S=cos1-cos2+cos3-…+...

Написать программу для подсчета слов
В тесте приводятся пример программы main_example.cpp для подсчета слов из текстового файла...

Написать программу для подсчета слов в строке
Дана строка, содержащая несколько слов ,разделенных одним пробелом. В начале строки и в конце...

Написать программу для подсчета единиц в последовательности
подсчитывается количество единиц в последовательности, нулей и едениц.


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.