Вычисление значения функции с помощью циклических структур - Pascal
Формулировка задачи:
Помогите пожалуйста составить программу вычисления значения функции с помощью циклических структур.
Решение задачи: «Вычисление значения функции с помощью циклических структур»
textual
Листинг программы
var p,f:real;
k:byte;
begin
p:=0;
f:=1;
for k:=1 to 7 do
begin
f:=f/k;
p:=p+exp(k)*f;
end;
write('P=',p:0:2);
end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д