Сколько раз будет исполнен цикл в фрагменте программы p:=3; repeat p:=p*0.1 until p<0.1;
181
336
Ответы на вопрос:
Const n = 10; var i, a, s: integer; begin for i : = 1 to n do begin read(a); s : = s + a; end; writeln(s); end.
Популярно: Информатика
-
ane4ka25800016.03.2021 23:46
-
Aytgbssh22.12.2022 09:58
-
Совушка20021306.02.2022 04:08
-
gothalk201425.09.2021 05:10
-
sergeyyakimov0528.05.2020 14:54
-
ЯрикФролов20.04.2022 17:51
-
OtvettePlz19.12.2021 05:11
-
valeriia803.01.2021 14:41
-
arsigonin07.02.2022 17:30
-
Alena20185912.12.2020 21:17