форум программистов
26 апр 2009, 08:51
26 апр 2009, 11:05
Код: Выделить всё
r:=1; for i :=1 to n do r:=r*(i/i+1);//r результат вычислений
Вернуться в «задачи на Паскале и Delphi»