Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
mt111
02.03.2023 19:18 •
Информатика
Написать программу на языке паскаль: вычислить сумму 1/2 + 1/4 + 1/6 + 1/2n
Показать ответ
Ответ:
daviduk2509
01.10.2020 13:43
Program h2;
const
n=20;
var i:integer;
s:real;
begin
for i:=2 to n do
begin
if (i mod 2=0) then s:=s+1/i;
end;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kushtueva
12.07.2022 09:16
Как превратить слово море в суша, и слово миг в век...
w11Maxim11w
26.08.2022 03:54
значення щільності розміщення напівпровідників у нанометрах для виготовлення мікропроцесорів за сучасними технологіями...
iliabalagansky
03.06.2023 15:20
Фаил размером 8 мбайт передается через некоторое соединение за 64 секунды. определите размер файла в кбайтах, который можно передать через это же соединение за...
bgdadanilenko20
03.09.2020 08:09
Проанализируй и запиши ответ, если a=7;b=13....
dadamuhamedovag
28.09.2020 07:54
Написать программы в паскале. 1. дан массив целых чисел. напечатать все элементы, оканчивающиеся нулем. 2. дан массив целых чисел. все нечетные числа удвоить, а...
михаил303
09.03.2020 02:02
Андреев валя чем понравилась эта книга, и кто понравился больше всего...
dolbaeb2k00
27.06.2020 17:29
вставьте буквы и объясните написание 1)Ул...жить вещи, громоз...кий велосипед, бе...заботный шофер, арена ц...рка, трезвый ра...чет, во...зал налево, предл...гать...
dinbili4
02.01.2021 17:06
В прямоугольном параллелепипеде ABCDA1B1C1D1 известны длины рёбер: AB=44 AD=33 AA1=35Найдите площадь сечения, проходящего через вершины C...
Кристиночка2003
29.09.2020 04:35
очень кратко жених призрак для читательского дневника...
Таня13151814
02.05.2022 12:22
Диагональ квадрата равна 8 см. Через каждую из вершин квадрата проведена прямая, параллельная соответствующей диагонали Определите периметр и вид полученного четырехугольника...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
const
n=20;
var i:integer;
s:real;
begin
for i:=2 to n do
begin
if (i mod 2=0) then s:=s+1/i;
end;
writeln(s);
end.