Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
vladEfimenko1
26.08.2021 18:59 •
Информатика
Написать программу на языке паскаль: вычислить сумму 1/2 + 1/4 + 1/6 + 1/2n
Показать ответ
Ответ:
Roserum
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 оценок)
Популярные вопросы: Информатика
Натаван11082004
10.08.2021 00:20
Выбери формулу расчёта суммы длин окружностей по заданным радиусам большого и малого кругов...
Впрвиво199119
27.02.2023 00:40
Мне нужно получить текст с одной табуляцией, получаю его я с 4я или 5ю. Я сделал код, который удаляет всю табуляцию ( \n ), но надо оставить одну. payload = { id : 63 , date :...
Nyashka12
30.12.2021 23:50
Дано целое положительное число n. Определите, какое наименьшее количество цифр с конца этого числа нужно удалить, чтобы первая и последняя цифры результата оказались одной четности...
АвторУлыбки
21.12.2020 16:24
Вячейку с3 внесена формула. какое значение отразится в этой ячейке? какие значения отразятся: в ячейке d3 при копировании формулы из c3 в d3? в ячейке с4 при копировании формулы...
Igorevna29
20.02.2022 13:29
решить в Pyton Предложите пользователю ввести имя человека , которого пользователь хочет пригласить на вечеринку. После этого выведите сообщение [имя] has been invited и увеличьте...
ДаняБл
19.03.2023 23:40
перегляньте сайт 7 чудес україни запишіть у зошит які елементи сайту відповідають вимоги ергономіки а які ні...
Ariya03
12.09.2020 17:09
Дан двумерный массив a, размером (n´n)(или квадратная матрица а). найти среднее арифметическое положительных элементов, верхней треугольной матрицы, расположенной выше главной...
evasyperandreev
11.06.2022 05:28
Ничего из этого не понял 2nd year students, EP 6B02125 «Fiction film direction»Associate professor of «Foreign Languages and APK», c.p.s. Tautenbayeva A.ATASK № 12. Theme: Production.Aim:...
dhsjkhd
11.06.2022 05:28
Два парусника массой по 1т притягиваются друг к другу с силой 2*10\-7Н. На каком расстоянии они находятся? Мне очень нужно скорее... Я заранее вас благодарю!...
sibuna1
11.06.2022 05:28
вставьте pendant,il y a,depuis. 4. ... les vacances il accompagne son père aux fouilles archéologiques. 5. ... le repas ils parlent de leur journée. 6. L enfant est devenu orphelin...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.