Question

До какого числа должно измениться значение счетчика i в фрагменте программы, чтобы А стало равным 120? A:=1; for i:=2 to … do A:=A*i;

Answer 1

Ответ:

До 5

Объяснение:

var a,i:integer;

begin

 a:=1;

 i:=1;

 while a <> 120 do

   begin

     i:=i+1;

     a:=a*i;

   end;

 write(i)

end.