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

while Итог работы for
x:=1; 1 for x:=1 to 5
while x=5 do 9 writeln(x);

begin 8
writeln (x) ; 7
x:=x-1 6
end; 5

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