Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Разработать блок схему и программу нахождения произведения натурального ряда чисел до числа n включительно

Ответ оставил Гость

Блок-схема - в прилагаемом файле.
Программа:
var n,i:integer; p:real;
begin
write(n = ); readln(n);
p:=1;
for i:=1 to n do p:=p*i;
writeln(p = ,p);
end.

Пример:
n = 10
p = 3628800