Ответы на вопрос:
Держите.var s: real; i,n: integer; begin writeln('введите количество лет и сумму вашего вклада'); readln(n,s); for i: =1 to n do s: =s+s*0.03; write(s); readln; end. var s: real; i,n: integer; beginwriteln('введите количество лет и сумму вашего вклада' ); readln(n,s); i: =1; repeats: =s+s*0.03; inc(i); until i> n; write(s); readln; end.
Популярно: Информатика
-
lutaasasa5p08d7e14.02.2022 04:33
-
Ева220823.07.2020 22:18
-
elleonoel15.05.2023 10:46
-
kolakao15.06.2021 20:20
-
Ardak12326.05.2020 05:03
-
Элайза530.10.2021 14:15
-
ваня32323223327.09.2021 18:01
-
marinandnatasha105.05.2021 07:19
-
7LittleKitten702.11.2022 05:45
-
basemaker03.01.2023 00:35