Проанализируйте работу программыprogrammath;var x, y: integer; beginx:=1; y:=1;whilex<7dobeginу:=y*2; x:=x+1 end; end.Ответьте на вопросы:а) Как узнать сколько раз исполнится тело цикла? б) Как узнать сколько раз исполнится тело цикла, если изменить условие на х>=7?