Составьте циклический алгоритм задачи. Заранее спасибо. Определить какая сумма будет на счету в банке через 10 лет, если первоначальный вклад составил S рублей, банк ежегодно начисляет P-процентов.
Const t=10; var p,i:integer; b,s:real; begin write('Вклад равен '); read(s); write ('Под процентом '); read(p); b:=1+p/100; for i:=1 to t do s:=s*b; write('Под процентами пролежавши 10 лет вклад накопил ',s:12:4,' рублей'); end.
Спасибо Большое. Очень помог.