Посчитайте сумму по следующему правилу s= 0+1+2*2+3*3*3+4*4*4*4 (и так от 0 до 10). составить программу паскаль

haka228 haka228    3   17.07.2019 17:10    0

Ответы
ivan488 ivan488  03.10.2020 06:33
 Var 
s,i,j,a:integer;
Begin  for i:= 1 to 3 do Begin   
for j:= 1 to i do      
a:=a*i;   
s:=s+a;   
a:=1; 
End; 
Write('ответ ',s+1);
End.  
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика