tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу ( pascal abc)
Написать программу ( pascal abc) программирование циклических алгоритмов. дано натуральное число n. вычислить s=1+1/3+1/5+1/7++1/2n+1
мамаТВ
3 20.09.2019 04:10
0
Ответы
artem20051105
08.10.2020 03:48
Var n,i:integer; s:real;
begin
readln(n);
s:=0;
for i:=0 to n do s:=s+1/(2*i+1);
writeln('s = ',s);
end.
Пример:
5
s = 1.878210678210678e+00
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Анастасия201811
23.11.2020 15:27
на компакт диске объемом 600 мбайт размещен фотоальбом каждое фото в котором занимает 500 кбайт. Сколько времени займёт просмотр всех фотографий, если на просмотр одной...
lizavettta888
23.11.2020 15:26
Решите задачу на питоне: С клавиатуры вводятся два целых числа в диапазоне от -10^9 до 10^9. Каждое число указывается в отдельной строке. Найти и вывести на экран сумму...
Nekop34
12.06.2019 18:50
Скажите , какая информация будет больше занимать места на диске: а) текст длиной в 100 символов в) фотография размером 100 на 100 с) музыка длиной в 1 секунду d) видео...
Tanya11011
12.06.2019 18:50
Какие устройства используются для ввода изображения в компьютер...
tvoyamamka7
12.06.2019 18:50
1101011 перевести в восьмеричную сисиему...
метал3
12.06.2019 18:50
Сделать а1(2) назовите свойства объекта операционной системы windows «рабочий стол» 1. фон; 2. заставка; 3. эффекты; 4. все ответы верны. а2(2) найдите общие имена объектов:...
danilru940Vova
12.06.2019 18:50
Вклассе 1000q учеников, из них 120q девочек и 110q мальчиков. найдите q...
lrydg2363
12.12.2020 13:43
Дана строка: “Lorem ipsum, dolor sit amet consectetur adipisicing elit. Iste debitis est modi. Blanditiis officia saepe doloremque vel deleniti porro reprehenderit cumque...
VoinBogov
12.12.2020 13:43
Запиши число 15584 в развёрнутом виде, начиная со старшего разряда....
maxmax41
12.12.2020 13:47
Напишите программу по обмену сомов на доллары и евро. *...
Популярные вопросы
Сумма 4-х чисел ровна 360. 2-е число больше 3-го в 3 раза, четвёртое...
3
Вычислите объем воды в мензурке до погружения в воду алюминиямассой...
2
Выберите тему и напишите объявление остранение объявления кому о чём...
2
Дайте определение наследственным и приобретенным признакам...
3
1. рассчитайте длину алюминиевого провода у кабине , если она включена...
1
Условия на 6 одинаковых пар детских ботинок расходуют 24 дм в квадрате...
2
Cu+hno3 почему взаимодействуют ? ведь по ряду активности металлов...
1
Решить систему неравенств по номером 80...
1
Туристы посетили водопад и озеро. на дорогу до водопада они затратили...
2
Complete the message with the giving to a present continuous form...
1
begin
readln(n);
s:=0;
for i:=0 to n do s:=s+1/(2*i+1);
writeln('s = ',s);
end.
Пример:
5
s = 1.878210678210678e+00