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

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

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