Ответы
Ответ дал:
0
Псевдокод:
алг Сумма вклада
ввод K
S:=K
нц для n от 1 до 18
S:=S*1.015
кц
вывод S
кон
Код Pascal:
Var
S:real;
i:integer;
Begin
Write('K = ');ReadLn(S);
For i:= 1 to 18 do
S:=S*1.015;
WriteLn('S = ',S);
End.
Пример:
K = 10
S = 13.0734063583203
Блок-схема:
алг Сумма вклада
ввод K
S:=K
нц для n от 1 до 18
S:=S*1.015
кц
вывод S
кон
Код Pascal:
Var
S:real;
i:integer;
Begin
Write('K = ');ReadLn(S);
For i:= 1 to 18 do
S:=S*1.015;
WriteLn('S = ',S);
End.
Пример:
K = 10
S = 13.0734063583203
Блок-схема:
Приложения:
![](https://st.uroker.com/files/ffd/ffdc3d16e559efaf16aaa44ddc24d175.png)
Вас заинтересует
1 год назад
5 лет назад
5 лет назад
8 лет назад
8 лет назад
9 лет назад