Вопрос по информатике:
Pascal. (через операторы цикла WHILE и REPEAT) Вычислить 2/1+3/2+4/3+...+(n+1)/n
Пожаловаться
- 08.07.2018 08:05
- Информатика
- remove_red_eye 13606
- thumb_up 9
Ответы и объяснения 1
Var sum,a,n:real;
begin
sum:=0;
a:=1;
writeln('Введите n');
read(n);
n:=n+1;
repeat
sum:=sum+(a+1)/a;
a:=a+1;
until a=n;
writeln(sum);
end.
Пожаловаться
- 10.07.2018 00:42
- thumb_up 50
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы