Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
turdalievab
05.11.2022 03:15 •
Информатика
Напишите программу на паскале. только полностью: дано натуральное n. вычислить: 2/1 + 3/2 + 4/3 ++n+1/n ( циклический алгоритм; цикл с заданным числом повторений).
Показать ответ
Ответ:
Marii111
06.10.2020 00:34
Var n,i:integer; s:real;
begin
write('n = ');
readln(n);
s:=0;
for i:=1 to n do s:=s+(i+1)/i;
writeln('s = ',s:6:4);
end.
Пример:
n = 5
s = 7.2833
0,0
(0 оценок)
Популярные вопросы: Информатика
yroslav120206
26.02.2023 17:08
Если глубина кодирования звука составляет 16 битов тогда количество уровней громкости звука равно...
НАСТЯ7539
02.02.2020 19:10
Почему операции div и mod не определены для вещественных чисел...
Илья281382
03.11.2020 04:27
Дан фрагмент программы бейсик паскаль алгоритмический нц для n от 1 до 5 for n=1 to 5 for n: =1 to 5 do нц для m от 1 до 4 for m=1 to 4 for m: =1 to 4 do k: =n-m+5 k=n-m+5...
nizomabdurahmon
21.02.2022 14:30
Задание 1. Автомат получает на вход два трехзначных числа. По этим числам строится новое число по следующим правилам. Вычисляются три числа - сумма старших разрядов заданных...
natalyabelozer3
19.07.2022 22:41
ОЧЕНЬ СИЛЬНО НУЖНО ДАЙ ВСЕ СВОИ !...
Милаха7884433
10.02.2022 04:33
11010001 10000010 11010001 10001011 100000 11010000 10111111 11010000 10111000 11010000 10110100 11010000 10111110 11010001 10000000 11010000 10110000 11010001 10000001 Расшифруйте...
vhovalyg90
07.06.2020 17:54
Дан массив из n x m элементов. Найти сумму элементов каждой строки. Система С+++...
7IX
07.06.2020 17:54
Разность максимального и минимального элемента массива. СИстема С+++ Только по ней делать...
13081990
01.02.2023 17:15
Прямоугольник длинна которого 8 дм.ширина на 15 см меньше.сколько равна площадь и периметр прямоугольника? заранее...
akzhanovarnai2
01.02.2023 17:15
Вставте буквы в слова: пот..нул, поч..ял, пот..хоньку,к в дно в миску тыч..т....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('n = ');
readln(n);
s:=0;
for i:=1 to n do s:=s+(i+1)/i;
writeln('s = ',s:6:4);
end.
Пример:
n = 5
s = 7.2833