Найти первый отрицательный член последовательности

@N0rD · Регистрация: 10.09.2011

Author24 — интернет-сервис помощи студентам

Дано вещественное число b>0, целое n. Последовательность a1, a2 ... образована по закону a1=b ,
$https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{i}={a}_{i-1}-$ $https://www.cyberforum.ru/cgi-bin/latex.cgi?\frac{1}{\sqrt[]{i}}$ , где i=2,3,...,n. Найти первый отрицательный член последовательности a1,a2,...

@Puporev · 10.10.2011, 16:31

Pascal

uses crt;
var b,a,a1:real;
    i:integer;
begin
clrscr;
repeat
write('Введите положительное вещественное число b=');
readln(b);
until b>0;
a1:=b;
i:=1;
while a1>0 do
 begin
  i:=i+1;
  a:=a1-1/sqrt(i);
  a1:=a;
 end;
write('a=',a:0:3);
readln
end.

@N0rD 3 / 3 / 4 Регистрация: 10.09.2011 Сообщений: 64
		1
	Найти первый отрицательный член последовательности 09.10.2011, 16:24. Показов 1718. Ответов 1 Метки нет (Все метки) Дано вещественное число b>0, целое n. Последовательность a1, a2 ... образована по закону a1=b , $https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{i}={a}_{i-1}-$ $https://www.cyberforum.ru/cgi-bin/latex.cgi?\frac{1}{\sqrt[]{i}}$ , где i=2,3,...,n. Найти первый отрицательный член последовательности a1,a2,... 0

	10.10.2011, 16:31

Найти первый отрицательный член последовательности

Решение