Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Kachalova54
15.12.2021 00:15 •
Информатика
Вычислить сумму 2/3+3/4+4/5++10/11 в паскале с оператором цикла
Показать ответ
Ответ:
evgeha19821
07.10.2020 05:17
Var
i, n :integer;
s :real;
begin
readln (n);
for i:=2 to n do
s:=s+i/(i+1);
writeln(s:0:10);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
mur181
09.03.2022 10:59
Здраствуйте С заданием:якi операцii можна выконувати з текстовими величинами?...
Аааоо0
28.04.2021 18:11
Определите, какие формулы записаны неверно. H7 H9*4=МИН(А1:A6)Е1+E3==СУММ(А1:Аб)=D3*$E$1...
максим13011
21.10.2020 02:15
50б -инструменты анализа «что, если» в ms excel. создать таблицы и использовать формулы для нахождения сумм....
vita131313
16.09.2020 23:05
Python информатика 35 нужны только 1 и 2...
geralis728p0bgjl
10.05.2022 02:45
Пример обмена информацией между людьми. кто в вашем примере является источником информации, а кто - приемником...
TimGoPro
05.06.2022 06:13
Напишите сочинение на тему: кто из героев романа дубровский меня поразил и почему . ! 45 !...
Zvezdo4kaKatty
05.06.2022 06:13
На поверхности земли 0 градусов. какая будет температура в шахте если её углублённость 3000 метров? на каждые 33 метра в углублённость температура поднимается на 1 градус...
Aresn
05.06.2022 06:13
Revission. test 1. iuocsn 2. eirfnd 3. yrapt 4. ekil 5. tnua 6. ecnul 6. pargnda 7. argndma 9. uesgt 10. adribthy 11. ekac 12. ollabon 13. eserpnt 14. rocotd 15. boj 16. cator...
toalexalfaa
05.06.2022 06:13
Бензол может взаимодействовать с: водой водородом хлороводородом бромной водой бромоводородом...
SnowWhite98
05.06.2022 06:13
Известно, что sint-cost=0,3 найдите sin^3t-cos^3t...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i, n :integer;
s :real;
begin
readln (n);
for i:=2 to n do
s:=s+i/(i+1);
writeln(s:0:10);
end.