Сколько раз будет исполнен цикл в фрагменте программы : p:=23 ; k:=0 repeat p:=p*0.1; k:=k+1; until p<0;<br>
P=23*0.1=2.3 k=0+1=1 until 2.3 <0 ===> true p=2.3*0.1=0.23 k=1+1 until 0.23 <0 ===> false ципл перестанет выполнятся и тогда получается что лн выполнился 2 раза