Найти сумму ряда из n-членов .s=1 + 1/2 + 1/1*2*3 + 1/n! .использовать процедуру или функцию.
233
433
Ответы на вопрос:
{нахождение суммы ряда } var n: integer; { процедура - функция} function sumr(m: integer): real; var i: integer; s,prom: real; begin s: =0; prom: =1; for i: =1 to m do begin s: =s+(prom/i); prom: =prom/i; end; result: =s; end; { конец процедуры } { основная программа } begin write('задайте n: '); readln(n); writeln('сумма ряда равна: ',sumr(n): 10: 5); end.
Разрядность процессора – это величина, которая определяет размер машинного слова, то есть количество информации, которой процессор обменивается информацией с оперативной памятью.
Популярно: Информатика
-
Mizuki111127.01.2023 16:15
-
BellaNow14.05.2020 20:23
-
sodzirovna09.02.2021 23:34
-
Meowmeowmi14.07.2022 21:50
-
yaya405.12.2021 13:34
-
мика095509.01.2022 23:30
-
Виника563408.08.2021 14:46
-
olgap51olga01.07.2021 17:49
-
2345Pomogite234528.12.2022 01:58
-
Masha2008260619.01.2021 12:58