Написать программу для вычисления выражения P=m*(m+1)*(m+2)*(m+3).*(m+n), где m и n некоторые числа.
kombat1488:
А на каком языке?
Ответы
Ответ дал:
1
Решение:
Вычислим программу для вычисления выражения P=m×(m+1)×(m+2)×(m+3)×(m+n)
--------------------------------------------------------------------------------------
PROGRAM А1;
VAR n,m:byte;
j:byte;
prd:real;
BEGIN
writeln('Вычисление суммы P=m×(m+1)×(m+2)×(m+3)×(m+n)...');
write('Введите n (1<n<30) : '); readln (n);
wright ('Введите m: '); readln(m);
writeln('');
prd:=1;
for j:=0 to n-1 do begin
write('(', (m+j),')*' );
prd:=prd * (m+j);
end;
writeln('');
writeln('Ответ: ',prd);
END.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад