Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Кисулятв
01.02.2023 00:00 •
Информатика
Вычислить сумму 2/3+3/4+4/5++10/11 в паскале с оператором цикла
Показать ответ
Ответ:
redstar33
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 оценок)
Популярные вопросы: Информатика
Nazarkadm
28.04.2022 04:15
Борис составил фрагмент таблицы истинности выражения F...
EvaSwansea12
16.05.2021 05:10
№ 6. Указать элементарные высказывания, их составляющие, написать формулы данных высказываний и построить таблицу истинности. Указать, какие из высказываний равносильны:...
maZIK007
25.02.2022 04:23
Микропроцессор выполняет: 1)вычисления и обработку информации 2)запуск программ 3)управлениями устройствами пк 4)хранение информации...
lpozzz
29.06.2022 00:34
Что такое стиль в текстовом процессоре MS Word? Каковы преимущества стилевого форматирования перед ручным? Какие основные виды стилей существуют в MS Word? Какова иерархия...
nikitabelokon21
23.02.2020 11:46
написать линейный алгоритм для исполнителя робот(по рисунку)...
Стас1326
12.12.2020 03:03
2. Які об єкти можуть міститись утекстових документах? Наведи приклади....
Настятвсердечко
22.02.2020 10:08
Задача на Паскаль! СОСТАВЬТЕ БЛОК СХЕМУ: var n: longint; sum: integer; begin readln(n); sum := 0; while n 0 do begin if n mod 10 mod 2 = 0 then sum := sum + n mod 10;...
VadimButs
12.04.2022 19:59
1. Дана строка. Определить, какая из букв – «о» или «а» – встреча- ется в ней чаще (принять, что указанные буквы в строке есть).2. Дано предложение. Определить, есть...
angelvkedah9
13.07.2020 21:31
Построить 2-х мерный массив размерности 6 на 6, содержащий произвольные целые числа, принадлежащие интервалу (-70,75). Выбрать из массива отрицательные числа и просуммировать...
тапочек6
16.08.2022 08:39
Первое задание Буди Бинга было: замерять температуру на улице в течение 7 дней. Что-то пошло не так, когда он записывал на бумажке, и данные 2 (по индексу) дня и 6 (по...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.