Написать алгоритм поиска суммы денежного накопления в банке по истечению срока с учетом ежемесячных процентов. Если известно, что первоначальная сумма
10-11 класс
|
вклада S рублей, ежемесячно к сумме прибавляется р% от суммы предыдущего месяца. И время вклада n месяцев.
При помощи операторов for to do
Помогите пожалуйста, 3 дня голову ломаю(((
Var i,n:integer; s,p:real;
Begin
write('S='); readln(s);
write('p='); readln(p);
write('n='); readln(n);
p:=p*0.01;
for i:=1 to n do s:=s+(s*p);
writeln('Ответ: ',s);
End.
Другие вопросы из категории
Читайте также
приводит к более интересным последствиям.
Пусть, например, заданы три числа: a1, a2, a3. Рассмотрим равенство a1+ a2= a3. Оно может быть неверным (например, если a1= 1, a2= 4, a3= 3), однако может стать верным, если поменять некоторые числа местами (например, если поменять местами a2 и a3, оно обратится в равенство 1 + 3 = 4).
Ваша задача – по заданным трем числам определить: можно ли их переставить так, чтобы сумма первых двух равнялась третьему.
Входные данные
Входной файл INPUT.TXT содержит три целых числа: a1, a2, a3 (−108 ≤ a1, a2, a3 ≤ 108).
Выходные данные
В выходной файл OUTPUT.TXT выведите слово «YES», если заданные числа можно переставить так, чтобы сумма первых двух равнялась третьему. В противном случае выведите в выходной файл слово «NO».
пышной булочки,а получилась слово ,обозначающее устройство для в вода информации в компьютер.Что написал програмист ,если известно , что он добавляет ,убирает или заменяет в слове ровно по одной букве
равно его удвоенному порядковому номеру.