tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу,которая
Написать программу,которая вычисляет сумму первых n членов ряда 1+1/2+1/4+1/6… количество суммируемых членов ряда задается во время работы программы. турбо паскаль
Шуранька
3 21.09.2019 18:40
0
Ответы
Ангелиночка02
27.08.2020 01:25
Var n,i:integer;
sum:real;
begin
Write('n=');readln(n);
sum:=1;
for i:=2 to n do
sum:=sum+1/i;
Writeln(sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
IvanPAW2145778
11.08.2019 01:20
Алгоритм нахождения суммы квадратов натуральных чётных чисел от 1 до 30. заранее большое желательно на завтра утром...
xgvhhdhs
11.08.2019 01:10
Составьте программу, которая вычисляет сумму первых десяти нечетных натуральных чисел с оператора ....
Xomka03
11.05.2020 16:39
Задания по информатике 6класс 4четверть...
Sasha0067890
08.10.2019 02:50
Решить, а самое главное обьяснить решение...
Garri14
08.10.2019 02:50
Pascal после каждого третьего символа в тексте поставить точку через insert...
Buivid1
08.10.2019 02:50
Подсчитать сумму элементов кратных 5...
infaitile
08.10.2019 02:50
После каждого третьего символа в тексте поставить точку паскальprogram pr1; uses crt; var a: string; i: integer; beginwriteln ( введите строку ); read (a); for i: =length (a)...
faas1501
31.08.2019 16:20
Сумма покупки составляет а-рублей, если а 1000 то предоставляется скидка 15% вывести на экран сумму покупки с учетом скидки,либо сообщение о том ,что скидка не предоставляется...
настя123456789108
31.08.2019 16:20
Текстові процесори призначені для опрацювання документів, які містять: а текст б зображення в схеми г слайди...
Rollov35
27.10.2020 14:09
Определите минимальное основание системы счисления, в которой могут быть представлены все следующие числа: 356, 776, 455....
Популярные вопросы
Мореплаватели готовили корабли к отплытию. всех мореплавателей разделили на...
3
Склади вираз зі змінною x і запиши множину значень, котрі може приймати ця...
3
Многие века исток темзы считался сященным.какое дерево охраняло его...
2
Сколько положительных членов в арифметической прогрессии 87,4; 82,8;...
3
Даны вершины треугольника: а(-6; 2) b(10: 10) c(0: -10). составить уравнения...
3
Какие кривые описываются следующими уравнениями: 2x^2-2y^2+2x=0...
3
(логарифм (3x-6) по основанию 5)/(логарифм (x+9) по основанию 5) 1...
3
Представьте заданные натуральные числа в каноническом разложении на простые...
2
Первый член арифметической прогрессии равен 6, а ее разность равна 4. начиная...
2
Встихотворение этого автора слугами были местоимения...
3
sum:real;
begin
Write('n=');readln(n);
sum:=1;
for i:=2 to n do
sum:=sum+1/i;
Writeln(sum);
end.