var i,n: integer; a:real; begin n := 1; readln(i); while n <= i do begin a:=n/(n*n); n:=n 1; writeln(a); end; end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.