Program vv; var n,a,i,s:integer; begin write(введите количество элементов последовательности ); read(n); s:=0; for i:=1 to n do begin if a mod 6=0 then s:=s+1; end ; write(сумма равна,s); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.