Войти Регистрация Спроси ai-bota

Написать программу которая вычислит сумму 1+ ¹/₂ + ¹/₃ + + ¹/₅₀

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

kononenkoalinka

13.06.2022 18:55

РЕБЯТА С ЗАДАНИЯМИ 3 И 4! 3. Путём преобразования докажите равносильность следующих высказываний: 1) (A & B) v (B & C) и (A & B) V (A& C) V (B &...

Alexader2352

14.04.2021 00:49

Введите номер инструмента, который позволяет осуществить поиск записей в базе данных. ответ запишите в числовой форме....

Danil02020202

11.11.2021 08:28

Здравствуйте. Подскажите как закрыть консоль?. Я все файлы удалял игры Ravenfield потом скачивал заново и все равно выходит эта консоль мешает играть....

Lerochka0204

09.03.2023 03:50

Язык программирования GO 1. Даны целые числа a, b, c, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами a,...

maryana070803

31.12.2020 11:56

Чему равна глубина цвета изображения состоящего из 128x75 пикселей и объёмом 2400 байт...

Otlichnica999

15.10.2020 05:15

Найти произведение всех двух значных чисел...

roman19781975

12.07.2020 02:59

Может кто объяснить как решить эту систему логических уравнений (номер 23)...

hadizat886

05.04.2022 16:41

Что будет выведено на экран в результате выполнения фрагмента программы цел a=5, b=3 вывод a, =Z( , b, )...

egopka666

04.03.2022 13:14

Нада сделать арифметическое кодирования слова «ободок» как это вообще делается кто знает...

ramil161

26.04.2020 00:14

вычислить произведение положительных элементов, двумерного массива. ввод данных выполните в подпрограмме. вычисление и ввод массива в результата в основной программе....

Ответ:

jroslov

07.10.2020 21:06

Var i:integer;
s:real;
begin
s:=0;
for i:=1 to 50 do
s:=s+1/i;
write('Сумма: ',s:5:2);
readln;
end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку