tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Для заданного числа n составьте
Для заданного числа n составьте программу вычисления суммы s=1+1/2+1/3+1/4++1/ n, где n – натуральное число.
milana00071
3 26.06.2019 13:20
10
Ответы
deniskakuzovle
21.07.2020 10:49
Var
i, n: integer;
s: real;
begin
write('Введите n: ');
readln(n);
for i:=1 to n do
s:=s+1/i;
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kokola500001
22.12.2020 17:25
Определите типы данных в указанной таблице. Например ячейка Имя - тип данных текст *...
kpucmuna2005
22.12.2020 17:26
Перевод: На основании данной таблицы определите форматирование таблицы по адресам ячеек....
ErnurNick
22.12.2020 17:26
Напишите понятие (термин) - Это совокупность всех программ, предназначенных для выполнения на компьютере....
Хорошистка541
22.12.2020 17:26
3. Алфавит племени Мульти состоит из 16 букв. Какое количество информации несёт одна буква этого алфавита?...
j89026190695
22.12.2020 17:26
Сколько байт в 32 Гбайт? 2.Шахматная доска состоит из 64 полей: 8 столбцов и 8 строк. Какое минимальное количество бит потребуется для кодирования координат одного шахматного...
yulyaanisimova2
23.08.2019 17:10
Напишите программу которая в последовательности натуральных чисел определяет количество всех чисел, кратных 6 и оканчивающихся на 0. программа получает на вход натуральные...
SeverinaWinter
23.08.2019 17:10
Найти произвидение первых трех цифр четырехзначного числа...
Love1963sss
20.10.2020 03:58
Днкодируй эту информацию и запиши ответ...
Zumman
20.10.2020 03:58
Используй английский алфавит и метод шифрования Код Цезаря, закодируй слово World по часовой стрелке на три буквы...
uliiashurinova
20.10.2020 03:57
Какие пункты содержит себе меню пуск? ...
Популярные вопросы
Смоделировать общественную проблему и написать пути ее решения с указанием...
2
Сделать два кластера на темы: глаголы , инфинитивы не пойму что это....
2
Решить 2 по .за 4 класс. а)мастер делает 120 деталей за 8 ч.но когда...
1
Переведи в километры и метры: 3 829м 8 206м 6 035м 3009м...
2
Превратить существительные в прилагательные,рыба живущая в...
2
Названия ядовитых животных которые живут в санкт-...
1
Нужно прочитать к завтому роман ивана пташникова алимпияда но в нете...
3
За день петя выкопал 12 ведер картофеля вместо намеченных 15.cколько...
3
Как решить? найдите наименьшее значение функции y=3-5pi/4+5x-5корней2sinx...
1
Надо . доведи, що натрій ацетат - сіль слабкої кислоти . результати...
1
i, n: integer;
s: real;
begin
write('Введите n: ');
readln(n);
for i:=1 to n do
s:=s+1/i;
writeln(s);
end.