составить программу(pascal) в которой посчитать произведение чисел от 1 до 9

1

Ответы и объяснения

Лучший Ответ!
2012-11-30T00:17:24+04:00

var

  s, i: integer;

 

begin

  s:= 1;

  for i:= 1 to 9 do

    s:= s * i;

  writeln(s);

end.