Question

Помогите пожалуйста,мне надо с решением. Цикл в фрагменте программы p:=2; repeat p : =p*0.1 until p<0.1; Будет исполнен?

Answer 1

Repeat - это цикл с пост условием то есть в первый раз всё равно выполнится. Теперь разберём цикл, он будет выполнять это действие
(p:=p*0.1) пока (p) не станет меньше 0.1 , теперь работаем в теле цикла, (p) изначально равен двум по этому получаем p:=2*0,1; получаем p:=0,2 проверяем условие 0,2<0,1  нет повторяем второй раз цикл, теперь p:=0,2 а не 2 как было в первый раз p:=0,2*0,1 p:=0,02 проверяем условие
0,02<0,1  да меньше цикл прерывается и (p) остаётся равным 0,02