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

Составьте программу следующую сумму: s=1+(1/2)+(1/3)++(1/50)

Ответ:

ЭллиВейн

05.10.2020 08:47

Var s,i: real;
begin
readln(a);
s:=0;
for i:=1 to 50 do begin
s:=s+(1/i);
end;
write(s);
end.

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

Популярные вопросы: Информатика

nadya1801

24.11.2020 10:32

Составить программу перевода 1-ого дюйма в сантиметры. (р.s: 1 дюйм=2,54 см)...

Abrak24

06.08.2020 20:03

Java вывести на экран 5 вещественных чисел из диапазона -+17...

hashedhashed1

01.04.2021 05:00

Изображение на экране монитора, состоит из 1600 пикселей по ширине и 1200 по высоте. диагональ монитора равна 17 дюймов. соотношение сторон,соотносящиеся как 16: 9. определите...

asvazy123

01.04.2021 05:00

Напшите достижения фернана maгеллана(их должно быть четыре), по короче ....

MonteCarlo

01.04.2021 05:00

Определите объём видеопамяти компьютера, который необходим для реализации графического режима монитора true color с разрешающей точек....

Аида524

24.12.2020 03:34

Оцените информационный объем аудиофайла в мб длительностью звучания 1,5 минуты, если глубина кодирования 16 бит, а частота дискретизации 8 кгц....

Annalove2000

15.03.2023 08:52

Число x получают след образом: слева на право записывают без пробелов подряд числа от 1 до n( ).по числу n определить,сколько цифр в числе x...

schestakov78

27.07.2021 15:30

Определить делится ли нацело произведение чисел на 3...

Ddoj

20.01.2020 03:23

Поиск минимальной цифры в целом числе n.составить блок схему...

black95

20.01.2020 03:23

Трудолюбивый муравей начал работать на строительстве муравейника. в первый день своей работы ему удалось найти и принести только 2 хвоинки, во второй в два раза больше,...

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

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