Регистрация
Mamayuliya1986
21.05.2021 17:29
Информатика
Есть ответ 👍

в чем разница между управлением в прямом режиме и в программном режиме?
2. какие команды входят в СКИ ГРИС; как они выполняются?
3. в какой последовательности происходит выполнение команд в линейном алгоритме?​

161
380
Посмотреть ответы 1

Ответы на вопрос:

alexandrasharapova
alexandrasharapova
4,8(14 оценок)
Попробуй так. думаю должно работать для умеренно небольшого n (во всяком случае до 8 или 9), смотря на сколько хватит стека. при больших n будет вылетать по ошибке памяти, наверное. компилятора под рукой нет, не тестировал, может где баг сидит. попробуй у себя, если что будет  не так, то напиши. вводимое число должно быть больше или равно 2, иначе прога сбойнёт. program bobsfeel ; var n: integer ; var s: real ; function sm ( i : integer ) : real ;     var znak : integer ;     begin      if ( i = 2 ) then sm : = 0.5 else        begin          if ( i % 2 = 1 ) then znak : = -1          else znak : = 1 ;         sm : = znak / i + sm ( i - 1 ) ;         end ; end ;   begin  write('vvdiete n > = 2 _') ;   readln(n) ;   s : = sm ( n ) ;   writeln('s= ' , s ) ;   end.

Популярно: Информатика