программа на паскале.оператор цикла с параметром.задание:вычислить число S=S1+S2 S1=1+2+3+......N S2=1*2*3*.....N

1

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

Лучший Ответ!
  • Участник Знаний
2012-02-19T23:34:35+04:00

var

i,s1,s2,s,n:integer;

begin

s1:=0;

s2:=1;

read(n);

for i:=1 to n do 

begin

s1:=s1+i;

s2:=s2*n;

end;

s:=s1+s2;

write (s);

end.