Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Yasik228
21.03.2023 00:35 •
Информатика
Вычислить 1-1/2+1//9999-1/10000 последовательно слева направо вычисляются 1+1/3+/9999 и 1/2+1/4+/10000, затем второе значение вычитается из первого.
Показать ответ
Ответ:
alyaomelchenko
10.07.2020 22:53
Var i: integer;
a, b:real;
begin
i := 1;
a := 0;
while(i<=9999) do begin
a := a + 1 / i;
i := i + 2;
end;
i := 2;
b := 0;
while(i<=10000) do begin
b := b + 1 / i;
i := i + 2;
end;
writeln(a-b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
angelina3404
14.07.2020 20:10
Дано натуральное число. определить: 1) определить количество повторений заданной цифры в нем 2) сколько раз в нем встречается цифра, равная последней 3) количество четных цифр...
androp4ik1
06.03.2023 09:09
Составить для нахождения суммы всех трехзначных натуральных чисел....
Exzampkle
13.08.2020 18:00
По инфе: злая мачеха отправила падчерицу к роднику за водой. вот тебе 2ведра, в одно из них входит 9литров воды, а в другое-5 литров.но ты должна принести домой ровно 3 литра...
stanislavgulya
04.11.2021 01:22
Число из трех цифр отняли от числа, которое складывается с тех самых цифр, размещенных в обратном порядке. результат складывается из тех самых цифр, размещенных опять по другому....
Мимиf
13.01.2020 08:35
Написать программу, вычисляющую значение функции y(x) для заданного х. 210, при х≤10, y(x)=x3 , при x 10....
нарешатор
13.01.2020 08:35
Сообщение записывается с алфавита, состоящего из 8 символов, которые кодируются так, чтобы в каждом байте было записано максимально возможное целое число символов. по имеющемуся...
Шмигельська
29.07.2022 14:42
1. в двух пакетах есть рис. вес первого пакета =m кг, а второго= n кг.нужно определить общий вес пакетов и какой из них тяжелее. 2,найдите суммы положительных и отрицательных...
Ольга25052000
29.07.2022 14:42
Напишите на ая алгоритм сложения двух простых дробей(без сокращения дроби)...
школофей
27.01.2023 20:00
Смешали v1 литров воды с температурой t1 градусов цельсия с v2 литрами воды с температурой t2 градусов цельсия. вычислить объем и температуру полученной смеси...
568423984268
27.01.2023 20:00
Палитра изображения содержит 256 цветов,сколько бит приходится на кодирование одного пикселя?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a, b:real;
begin
i := 1;
a := 0;
while(i<=9999) do begin
a := a + 1 / i;
i := i + 2;
end;
i := 2;
b := 0;
while(i<=10000) do begin
b := b + 1 / i;
i := i + 2;
end;
writeln(a-b);
end.