Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
SashaZorikhina
21.04.2020 11:59 •
Информатика
Дано натуральное число n вычислить s=1/(3^2)+1/(5^2)+1/(7^2)+1/((2n+1)^2) решите через for (^2- степень ; 1/(3^2)- дробь)
Ответ:
gax17003
04.10.2020 09:25
Var
s: real;
i, n, t: integer;
begin
readln(n);
for i := 1 to n do
begin
t := 2 * i + 1;
s := s + 1 / (t * t);
end;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
jakupovaalbina
10.01.2023 04:29
Что означает запись « шрифт times new roman ,12пт?...
1234дмит232323
30.06.2022 20:23
Вчем заключается адресуемости внутренней памяти компьютера ? ?...
nazi33
21.03.2022 15:26
На месте преступления были обнаружены четыре обрывка бумаги. следствие установило, что на них записаны фрагменты одного ip-адреса. криминалисты обозначили эти фрагменты буквами...
GardenBrid
21.03.2022 15:26
Составьте программу для расчёта значения количества нечётных трёхзначных чисел...
leda5
14.10.2022 07:26
Для каких целей необходимо системное по?...
kseniaLi555
14.10.2022 07:26
Для каких целей необходимо системное по?...
Гриимитсичень
14.10.2022 07:26
Какой информационный процесс осуществляли гонцы в древние времена? -хранение -передача -создание -обработка...
annapetrovakons
19.01.2021 10:42
Найти номера всех элементов с минимальными значениями. вывести кол-во таких элементов(паскаль)...
Like2942
07.09.2022 11:31
На бесконечном поле имеется вертикальная стена. Длина стены неизвестна. От нижнего конца стены вправо отходит горизонтальная стена также неизвестной длины. Робот находится в клетке,...
вика2832
16.08.2022 09:55
ЗАДАНИЕ №9 ВРЕМЯ НА ВЫПОЛНЕНИЕ: x 00:00 ments for ТЕКСТ ЗАДАНИЯ II. Correctly choose the appropriate indefinite pronoun. (правильно подбери подходящее неопределенное местоимение:...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
s: real;
i, n, t: integer;
begin
readln(n);
for i := 1 to n do
begin
t := 2 * i + 1;
s := s + 1 / (t * t);
end;
writeln(s);
end.