tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано натуральное число n вычислить
Дано натуральное число n вычислить s=1/(3^2)+1/(5^2)+1/(7^2)+1/((2n+1)^2) решите через for (^2- степень ; 1/(3^2)- дробь)
fdgtrg4gewf
2 10.08.2019 13:40
0
Ответы
митцухиро
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Angelina626
19.05.2020 22:53
Написать программу в Паскале, которая бы показывала - поступит ли выпускник в ВУЗ, если ему необходимо в сумме набрать...
kovalenko7659
10.09.2021 07:08
На языке Python . Введено трёхзначное число. Найти сумму чётных чисел...
slava90100
10.09.2021 07:08
На языке Python. Задана арифметическая прогрессия 2; 5; ... . Определите наименьшее кол-во членов прогрессии, начиная с первого, сумма которых превышает 50...
bdoyan1994
10.09.2021 07:05
СДЕЛАЙТЕ КОНСПЕКТ ПО ПАРАГРАФУ!...
Pavlo1248
08.11.2021 15:08
(функция)f(x) = tg x + |x| (пределы функции)x²+ y² ≤ 1; x ≥ 01. Пошагово вычислить значение выражения.2. Применить стандартные функции C++....
OlgaKF
08.11.2021 15:09
У исполнителя альфа две команды которым присвоено номера + 1 умножить на Б Б неизвестное натуральное число выполняя первую из них альфа увеличивает число на экране на один...
Lollladka1
23.10.2020 10:45
ASCII кодтау кестесін пайдаланып «Компьютер» сөзін екілік сандар жиынымен түрлендіріңіз....
malvinka011
09.02.2022 19:36
Промежутки, которые получаются при решении строгого неравенства...
angelok8408
09.02.2022 19:36
стан деякого газу сталої маси змінюється за графіком, що показаний на малюнку. -назвати процеси, написати рівняння процесів, побудувати графіки процесів в координатах (р,...
TheEnder
09.02.2022 19:36
Выбери продолжение утверждений из списка.Стремление к практичности и поиску пользы во всем показанно образе. Очень легко...
Популярные вопросы
Как вы понимаете смысл предложения,он плакал до тех пор,пока сон не охватил...
3
Велосипедист який рухається із швидкістю 3м/с спускається з гори за 6с...
3
Напишите решения на листочке ...
3
Маса ядра атома ізотопу рівна 108 а. о. м. в електронній оболонці атома...
3
Ккакому периоду относится творчество шекспира выберите один ответ: высокого...
3
Тэк россия 9 класс вариант 2 sos...
3
Составьте программу (паскаль) для решения : в игре лото из мешка случайным...
1
Исполc ulри ви umbe». 1) а, u, f 2) в, д, е 3) а, в, г 4) б, г, д.4. какие...
2
Решите .. какое количество теплоты потребуется для превращения 10 кг льда...
3
Напишите диалог на тему уақытты бағалайсың ба? ( 35 ) ....
3
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.