Не понимаю как составить программу вычисления суммы и произведения ряда sin1, sin2, sin3, ., sinN - Pascal
Формулировка задачи:
Составить программу вычисления суммы и произведения ряда sin1, sin2, sin3, ..., sinN
Задачу мне нужно решить 3-мя способами: с параметром, цикл-пока, цикл-до.
Решение задачи: «Не понимаю как составить программу вычисления суммы и произведения ряда sin1, sin2, sin3, ., sinN»
textual
Листинг программы
var i,n:integer;
s,p:real;
begin
n:=10;
s:=0;
p:=1;
for i:=1 to n do
begin
s:=s+sin(i);
p:=p*sin(i);
end;
writeln('Цикл с параметром');
writeln('s=',s:0:4);
writeln('p=',p:0:4);
writeln('-------------');
writeln('Цикл с предусловием');
s:=0;
p:=1;
i:=1;
while i<=n do
begin
s:=s+sin(i);
p:=p*sin(i);
i:=i+1;
end;
writeln('s=',s:0:4);
writeln('p=',p:0:4);
writeln('-------------');
writeln('Цикл с постусловием');
s:=0;
p:=1;
i:=1;
repeat
s:=s+sin(i);
p:=p*sin(i);
i:=i+1;
until i>n;
writeln('s=',s:0:4);
writeln('p=',p:0:4);
end.
Объяснение кода листинга программы
- Объявление переменных:
i- целое число, счетчик циклаn- целое число, предел последовательностиs- вещественное число, переменная для хранения суммыp- вещественное число, переменная для хранения произведения
- Инициализация переменных:
nприсваивается значение 10sиpинициализируются нулем
- Цикл с параметром:
- Выполняется цикл от 1 до
n - В каждой итерации к
sприбавляется значение синуса отi - В каждой итерации
pумножается на значение синуса отi
- Выполняется цикл от 1 до
- Вывод результата для цикла с параметром.
- Цикл с предусловием:
- Зануляются переменные
sиpи инициализируется счетчикiзначением 1 - Выполняется цикл с условием
while i<=n - В каждой итерации к
sприбавляется значение синуса отi - В каждой итерации
pумножается на значение синуса отi - После каждой итерации счетчик
iувеличивается на 1
- Зануляются переменные
- Вывод результата для цикла с предусловием.
- Цикл с постусловием:
- Зануляются переменные
sиpи инициализируется счетчикiзначением 1 - Выполняется цикл с условием
repeat...until i>n - В каждой итерации к
sприбавляется значение синуса отi - В каждой итерации
pумножается на значение синуса отi - После каждой итерации счетчик
iувеличивается на 1 - Выполняется цикл до тех пор, пока
iне станет большеn
- Зануляются переменные
- Вывод результата для цикла с постусловием.