tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Вычислить сумму ряда 1 - 1/2
Вычислить сумму ряда 1 - 1/2 +1/3 - +1/999 - 1/1000 справа – налево, в паскале
grrrrrrrrrr
1 24.05.2019 23:10
1
Ответы
АнгелинаМанакова
20.06.2020 21:56
Var x, y: Real;
i: integer;
begin
for i := 1000 downto 1 do
begin
if (i mod 2 = 0) then y := -1 * i
else y := i;
writeln('1/', i);
x := x + 1 / y;
end;
writeln('> ', x);
end.
А вручную это пришлось бы минут 30 даже с калькулятором считать х_х
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
keue435436
18.10.2020 09:16
Бейне және дыбыстық форматқа не жатады?...
kiraganziy
18.10.2020 09:16
зарание реферат по информатике на тему: моделирование в современном мире человекаГрафическое Компьютерное Табличное...
Mariaaglotkova
07.04.2020 22:16
Заполнить массив случайными числами в интервале [1000,2000] и подсчитать число элементов, у которых последняя цифра равна 7...
MomoiSatsuki16
07.04.2020 22:17
Уровень-применение. Угадайте слово в ребусе...
dogmisha228
07.04.2020 22:17
Шахматное домино Комплект шахматного домино состоит из 32 костяшек 2×1, каждый из квадратов которой окрашен в черный или белый цвет (часть костяшек состоит из двух белых квадратов,...
nekitpundya2256
17.11.2020 08:47
Drag and drop to train a 3nn model to classify iris and output the predicted probabilities on the testing data set:...
Малика25072002
17.11.2020 08:46
Найти разность 41(10) - 17(10) в восьмибитном представленииПрямой код:Обратный код:Дополнительный код:ответ:...
DarinaKim1
04.11.2020 09:50
Что понимают под фрагментом изображения у меня СОЧ умоляю вас хелп...
manzharenko13
04.11.2020 09:50
Tower Of Hell top help me plz...
ДимаИванов11
30.09.2019 02:20
Музыкальный фрагмент был оцифрован и записан в виде файла без использования сжатия данных.получившийся файл был передан в город а по каналу связи за 68 секунд.затем тот же музыкальный...
Популярные вопросы
Большая диагональ прямоугольной трапеции равна 17 см ,а большее основание...
2
Начерти окружность ралдиус которой состовляет 1см 5 мм и назови ее нужно...
1
Как ты понемаешь вырожение ,,думать на несколько ходов вперёд...
1
Треугольники abc и pmk равны. известно, что ab=5см, bc=10 см, угол c=36°....
2
Придумать предложение со словом эпицентр и центр...
2
Собака за 4 с пробежала 47 м. найдите скорость собаки, запишите её в виде...
1
Какую функцию науки иллюстрирует практическое внедрение скороспелых сортов...
2
Площадь трёх участков a га. площадь первого участка составляет 25% всей площади....
3
Произведение каких двух чисел равно каждому из них...
3
Тело совершает гармоничное колебание по закону х=25 sinπt определите амплитуду...
3
i: integer;
begin
for i := 1000 downto 1 do
begin
if (i mod 2 = 0) then y := -1 * i
else y := i;
writeln('1/', i);
x := x + 1 / y;
end;
writeln('> ', x);
end.
А вручную это пришлось бы минут 30 даже с калькулятором считать х_х