Программалық кодтағы операторлар тізбегінің балама операторын анықта.
X=5
Y=5
Z=5.
163
220
Ответы на вопрос:
Var year: integer; s, s1, p: real; begin write('сумма: '); readln(s); write('процент: '); readln(p); s1 : = s; year : = 0; while s * 5 > s1 do begin s1 : = s1 + s1 * p / 100; year : = year + 1; end; write(year); end.
Популярно: Информатика
-
dykbguojd07.12.2022 15:48
-
StEInN230.06.2020 01:22
-
shitovilya14.01.2022 01:46
-
kamilya1495725.08.2021 20:00
-
мухтар11214.08.2022 09:55
-
Anastasia200327207.12.2020 22:53
-
Dashuli4ka200120.05.2022 05:42
-
56895426.02.2020 16:25
-
Dogi201903.02.2023 20:41
-
evamakarova2006.05.2021 00:58