1. Информатика
  2. Вычислить значение суммы 8 членов

Вычислить значение суммы 8 членов следующего ряда: 19+k/(2+k)+k/(4+k)+k/(6+k)…. k> 0 вводятся с клавиатуры

levyjigor45 levyjigor45    1   09.06.2019 07:30    0

Ответы
Milkyway3000 Milkyway3000  08.07.2020 06:48
Pascal:
var
  s, k: real;
  i: byte;
begin
  s := 19;
  readln(k);
  for i := 1 to 8 do
    s := s + k / (i * 2 + k);
  writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kistinakravcenk kistinakravcenk  16.07.2019 22:20
Паскаль procedure f(n: integer); begin if n = 5 then begin f(n + 2); writeln (n); f(n + 3) end end чему равна сумма всех чисел, напечатанных на экране при выполнении вызова f(l)?...
maxim199431 maxim199431  16.07.2019 22:20
1. вы европейский бизнесмен, уезжаете в отпуск в австралию, хотите быть в курсе дел вашей компании. каким каналом связи вы воспользуетесь? 2. вы хотите организовать свою компанию...
enotny enotny  16.07.2019 22:20
Программа: заменить союз end в тексте на союз or в паскале...
DjRio DjRio  16.07.2019 22:30
Какие элементы звуковой карты отвечают за запись звука в компьютер и за его акустическое воспроизведение...
ematrenichev ematrenichev  16.07.2019 22:30
Выберите возможные типы переменной k для внесения в неё значения -1,3 a) integer b) real c) boolean d) string...
Alena11094 Alena11094  16.07.2019 22:30
40 . 10класс дан массив ,заданный датчиком случайных чисел в интервале [-60; 140]. определить, максимальный и минимальный элемент массива....
Kotliarrostislav Kotliarrostislav  16.07.2019 22:40
Python. 50 напишите программу, которая определяет, верно ли, что введённое число содержит две одинаковых цифры, стоящие рядом (например, 221)...
Россия111111111111 Россия111111111111  16.07.2019 22:40
Написать программу умножение чисел( в pascal)...
GGG1771 GGG1771  16.07.2019 22:40
На школьном дворе разбивают 4 клумбы прямоугольной формы. первая клумба представляет собой квадрат со стороной 14 метров. вторая клумба имеет форму прямоугольника, его стороны...
vikakruchko1405 vikakruchko1405  16.07.2019 22:40
Написать программу с использованием цикла while. через каждые пять секунд каждая амеба делиться на две амебы. изначально была 1 амеба. сколько амеб будет через n секунд? проверить...

Популярные вопросы