Задание

Выберите фрагмент программы, в котором ищется произведение 1∙2∙3∙4∙5.

p:=0; i:=1; while i:<=5 do i:=i+1; p:=p*i;

p:=1; i:=1; while i:<6 do i:=i+1; p:=p*i;

p:=1; i:=1; while i:<6 do begin p:=p*i; i:=i+1; end;

p:=1; i:=1; while i>5 do begin p:=p*i; i:=i+1; end;