Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
shipashka
20.09.2021 08:54 •
Информатика
Дано натуральное число n. вычислить: s=1/1+1/2+1/3+⋯+1/n составить программу в паскале
Показать ответ
Ответ:
Айрона
24.07.2020 15:31
Var
i,n:integer;
s:real;
begin
readln(n);
for i:=1 to n do
s:=s+1/i;
writeln(s:4:2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Гуманитарий777
05.03.2022 00:57
В ячейке А1 содержится формула $D$2-C2 как изменится эта формула при копировании ее из ячейки А1 в ячейку А2...
BRB987
02.01.2020 17:30
Сколько блоков существует в программе? ...
svetskazka1978
05.11.2022 16:48
Логические данные - это: денежные данные текст числа одно из двух значений...
POZZITIFFON34
01.01.2022 13:57
Какие из чисел могут быть записаны в восьмиричной системе счисления: 4,25,7,8,3,0,10...
наиб3
21.09.2020 05:28
очень В латинском алфавите всего 26 букв. Как можно назвать следующие столбцы (27-й и далее), если использовать только буквы? 27-й: 28-й: 29-й: 53-й: 54-й: 55-й: 79-й: 80-й: 81-й:...
саша8510
17.01.2020 08:57
1.Складіть блок схему фрагмента алгоритму,у якому в цикл з лічильником вкладено неповне розгалуження.Поясніть виконання складеного фрагмента.2.Складіть блок схему фрагмента алгоритму,у...
VIP161
30.04.2022 16:50
Определить значение переменных после выполнения фрагмента алгоритма ...
mashaa2660
31.05.2022 07:58
Какие функции у этих команд 1) screen= pygame.display.set_mode((500,400)) 2) horse_surf= pygame.image.load( horse.bmp ) 3) for event in pygame. event.get(): 4) ball_rect=ball_surf.get_rect(center=...
MARZHIVANKINA
24.12.2020 01:42
Напишите люое стихотворение в котором всего 16 строчек ну легкий стих мне его завтра нада уже...
Balthazar1
24.12.2020 01:42
Составьте вопросы к предложениям начиная словами в скобках. 1. she takes the temperature twice a day(does) 2 i live not far from my college (where) 3 he likes to sit and watch...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,n:integer;
s:real;
begin
readln(n);
for i:=1 to n do
s:=s+1/i;
writeln(s:4:2);
end.