Вычислить произведение: 1/2*1/3*...*1/n
2 комментария:
Вы это ради 10 баллов
спс
Вы это ради 10 баллов
спс Ответы
Гость Program kek;
var s.i,n:integer;
s:=0;
readln (n);
for i to n do
s:=s+1/i;
write ('сумма равна ', s);
end.
Нет комментариев
Похожие вопросы
Информатика
Люди!!! Срочно,умоляю,помогите,пожалуйста!Составить программу для рисования звездного неба(в паскале)....
Информатика
Помогите пожалуйста!!!!...
Список предметов
