Запрограммировать б) s: =1; а: =1 от i=1до 3 цикл s: =s+i.(i+1)а а: =а+2

Alla03u03 Alla03u03    3   21.07.2019 21:40    2

Ответы
Seselia Seselia  23.09.2020 11:45
Var
  s,a,i:integer;
Begin
  s:=1; a:=1;
  for i:= 1 to 3 do
    Begin
       s:=s+i*(i+1)*a;
       a:=a+2;
    End;
 write('S = ',s,', A = ',a);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика