Предмет: Информатика,
автор: VaTiger
Найти сумму членов последовательности. Писать на Паскале
Приложения:
![](https://files.topotvet.com/i/7f8/7f83b8abd1338a9906c76ecd82ab2ab7.png)
Ответы
Автор ответа:
0
Ответ:
Объяснение:
Чет знакомое задание, вы случаем не студент?
program Summa;
var
i,t,n:integer;
S,P:real;
BEGIN
writeln('Введите последнее число последовательности n.');
readln(n);
S:=0;
t:=1;
for i:=1 to n do
begin
t := t*i;
writeln('!',i,'=',t);
S:=S+(1/t);
end;
writeln('Сумма=',S,'.');
end.
krymer220:
Ну я студент 1 курса, у меня щас по программе, было идз только, ряд другой и еще произведение надо было найти.
Похожие вопросы
Предмет: Английский язык,
автор: elibaevanigina
Предмет: Физика,
автор: leytismisha
Предмет: Математика,
автор: ivanarchipov06
Предмет: Литература,
автор: alisamoli
Предмет: Химия,
автор: kristinakuts20