Проанализируйте фрагменты программ. Запишите результат их работы. Для каждого случая запишите фрагмент программы, обеспечивающий

while Результат работы forx:=1; 1 for x:=1 to 5 while x=5 do 9 writeln(x); begin 8writeln (x) ; 7 x:=x-1 6end; 5

х:=5 25 for x:=5 downto 0 do while х>=0 do 16 beginbegin 9 у:=x*x; y:=x*x; 4 writeln (y); writeln(y) 1 end;end; 0