Ответы на вопрос:
Var k: real; a,b,l: integer; begin write('население города: '); read(a); write('на сколько % будет увеличиваться население: '); read(k); k: =k/100; b: =3*a; while a< =b do begin a: =a*k+a; l: =l+1; end; writeln('население города утроится через ',l,' лет(года)'); end.
Популярно: Информатика
-
дима290325.06.2020 15:12
-
elvinsasylbaeva27.01.2020 00:49
-
ніка3765426.12.2022 02:59
-
Валерия336505.06.2021 01:44
-
Potap4uk30.01.2023 12:57
-
адильхан923.06.2022 04:28
-
GoodSmileEweryDay15.09.2021 21:02
-
5ти02.09.2020 10:50
-
kokoulina6829.06.2020 04:45
-
Rusena30.11.2021 16:29