Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
адрдрюе
01.12.2020 08:05 •
Информатика
Составьте программу на языке паскаль которая высчитывает сумму цифр 1/2+1/3+1/4+/n
Ответ:
vazovskiy2013
16.09.2020 08:51
Var i,n:integer;
c:real;
begin;
readln(n);
for i:=2 to n do
c+=1/i;
writeln(c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
lavrovaa0
06.01.2020 15:10
Определите расстояние, которое преодолеет поезд, двигаясь со скоростью v км/м, t часов....
andreevanton0
06.01.2020 15:10
Компакт-диск предназначенный для многократной записи новой информации называется : а)cd-rom б) cd-rw в)dvd-rom г)сd-r д) дискета...
лаброри
06.08.2022 20:19
4. а = 0, в = 1. в какой из ниже записанных формул результатом будет 1 (истина)? а) ¬ в б) а и в в) ¬ (а или в) г) ¬ а или ¬ в с решением...
kustsireni
13.05.2022 01:55
Используя цикл для , создайте алгоритм и начертите схему для решения : вычислите сумму положительных чисел, вводимых с клавиатуры в одну и ту же ячейку. количество слагаемых вводить...
alenka0810
20.07.2022 15:53
Дано число, удвоить его в 3 раза если оно кратно 17. в противном случае уменьшить на 4. вывести ответ на экран. в pascal abc...
profi1212
28.01.2023 00:07
7. найдите значение переменной s после выполнения фрагмента программы на языке программирования turbopascal: s : = 2; k : = s * 3; s : =sqr (k) - 1; s : = s – k;...
vadim88768
02.01.2021 17:28
дан школьный журнал. в нём стоит 25 оценок, от 1 до 5. напишите программу в паскале, что бы она выдавала количество пятёрок. умоляю В ПАСКАЛЕ...
elimasataeva
25.06.2021 01:31
В кодировке UTF-16 каждый символ кодируется 16 битами. Прокофий написал текст(в нем нет лишних пробелов): Зульфира, Акакий, Афанасий, Прасковья, Изольда, Марфа- имена . Ученик вычеркнул...
Logicsmile007
14.07.2020 15:33
Чем равен обьем куба длина которого равна 3см 4см 5см ?...
qqlaza
14.07.2020 15:33
Решить это по действиям 1)2/2/11*7/8: 7/11 2)3/2/3*4/7/8: 13/16 3)1/1/3*2/2/3: 4/9...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
c:real;
begin;
readln(n);
for i:=2 to n do
c+=1/i;
writeln(c);
end.