Var n:integer; A,S:Real; Begin Write(n = );ReadLn(n); WriteLn(Введите числа(,N, шт.)); For n:= 1 to n do Begin Read(A); S:=S+A; End; WriteLn(Sr = ,S/n); End.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
