1. Информатика
  2. Решить в pascal s=1/2-2/3+3/4-5/6+

Решить в pascal s=1/2-2/3+3/4-5/6+ цикл

almaz20004 almaz20004    2   02.06.2019 01:10    0

Ответы
melnikowapolia melnikowapolia  02.07.2020 22:56
var \ i,n:integer;\\
s:real;\\
begin\\
 s:=0;\\
 n:=10; \\
 for \ i:=1\ to\ n \ do \\ \ \
 s:=s+power(-1,i \ div \ 2)*(i/(i+1));\\
 writeln(s);\\
 end.\\
n-необходимая точность, 1000 хватает вполне (для типа реал)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
berekesymbat2002123 berekesymbat2002123  16.08.2019 12:00
Fat это: 1) сообщение об ошибки операционной системы 2)элемент рабочего стола 3)прикладной программы 4)таблица расположения файлов...
novakelizaveta7 novakelizaveta7  16.08.2019 12:00
Для заданного количества суток (tfh) требуется определить количество часов (h), минут (m) и секунд (с)...
dashapetiaeva dashapetiaeva  16.08.2019 12:00
Известно что 1 миля это семь вёрст 1 вес 100 - это 500 саженей 1 сажень это три аршина 1 аршин 28 дюймов 11 25,4 мм пользуюсь этой информации составьте линейный алгоритм перевода расстояния...
Егор111ив Егор111ив  16.08.2019 12:00
Чему равна сумма чисел х и у, при х=c116, у=са16. результат запишите в восьмеричной системе счисления....
Кристалина12 Кристалина12  16.08.2019 12:00
Как называется набор знаков, который лежит в основе знаковой системы? а)система б)порядок в)перечень г)алфавит...
anablack1 anablack1  16.08.2019 12:10
Сколько килобайт информации содержит сообщение объемом 2048 кбит...
darinaprokopenk darinaprokopenk  16.08.2019 12:10
Изобразить в прямоугольной системе координат в которой истины p следующего порядка: 1) (y≥x) и (y+x≥0) и (y≤1) 2) (|x|≤1) и (|y|≤1)...
Кица234 Кица234  16.08.2019 12:10
Циклические блок схемы с предусловием...
vikarere7 vikarere7  16.08.2019 12:10
Решить : 1)даны x,y,z.найти f=max(x^2+y^2-z; x^2+z^2-y)+64 2)y=(20x-10x^3,при x =10 (25x^3-61x^2,x 10...
soplador soplador  16.08.2019 12:10
Дан фрагмент программы на языке паскаль. чтобы программа продолжила диалог, необходимо ввести строку текста: …. writeln(‘введите пароль, ученик’); readln(pasw); if pasw=’не_могу_знать’...

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