Лучшие помощники

Megamozg 2205 б
Matalya1 1800 б
DevAdmin 1720 б
arkasha_bortnikov 900 б
Dwayne_Johnson 870 б

Показать еще

·

Информатика

6 декабря 2022 17:08

533

Дано натуральное число N. Вычислить: s=1/1+1/2+1/3+⋯+1/N
составить программу в Паскале

1 ответ

Посмотреть ответы

Var
i,n:integer;
s:real;
begin
readln(n);
for i:=1 to n do
s:=s+1/i;
writeln(s:4:2);
end.

0

·

Хороший ответ

8 декабря 2022 17:08

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Шахматная доска состоит 8 столбцов и 8 строк. Какое минимальное количество бит потребуется для кодирование координат одного шахматного поля.... Подскажите, пожалуйста, чему равно значение Суперпозиций σ((х2, σ(х3,х2)) и σ(х3, 0, 0, 1) ?... Несжатое растровое изображение размером 64 на 512 пикселей занимает 32Кбайт памяти. Каково максимально возможное число цветов в палитре изображения? а... У Тани дома живут ёжики, и, чтобы не запутаться в порциях корма, она написала программу, которая рассчитывает, на сколько дней хватит еды и сколько ли... Музыкальный фрагмент был оцифрован и записан в виде файла без использования сжатия данных. Получившийся файл был передан в город А по каналу связи за...