Нужно сделать программку на паскале.Есть "капитал" (нужно вводить самому с клавы),
Нужно сделать программку на паскале.
Есть "капитал" (нужно вводить самому с клавы), этот капиал каждый рабочий день (пн, вт, ср, чт, пт) возрастает на n процентов (число вводится с клаввиатуры) при условии, что после каждого денька капитал возрастает на те самые n процентов. Сколько денег будет на капитале через n дней (тоже вводится с клавы). Пример: было 600, каждый день этот капиал возрастает на 10%,в итоге 1-ый денек 660, второй денек 726, третий день 798,6, четвёртый 878,46. Число в итоге должно быть округлено до тысячных. 70 баллов даю.
program raf105;
var
capital,n: real;
i,d,weekday: integer;
begin
write('Введите капитал: ');
readln(capital);
write('Введите рост капитала(%): ');
readln(n);
write('Введите количество дней: ');
readln(d);
for i:=1 to d do
begin
if weekday = 7
then weekday:= 0;
weekday+=1;
if weekday lt;= 5
then capital+= capital/100*n;
end;
writeln('Через ',d,' дн. на капитале будет ',capital:0:2,' руб.');
end.
Язык PascalABC
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.
Математика.
Химия.