Объяснение:
Программа на питоне
a=1
for i in range(1,8)
a = a*i
C предусловием:
var
i, y: integer;
begin
y := 1;
i := 7;
while i > 1 do
y := y * i;
i := i - 1;
end;
writeln('Цикл с предусловием, факториал равен: ', y);
end.
C параметром:
const n=7;
i, s: integer;
s := 1;
for i := 1 to n do
s := s * i;
writeln('Цикл с параметром, факториал равен: ', s);
Объяснение:
Программа на питоне
a=1
for i in range(1,8)
a = a*i
C предусловием:
var
i, y: integer;
begin
y := 1;
i := 7;
while i > 1 do
begin
y := y * i;
i := i - 1;
end;
writeln('Цикл с предусловием, факториал равен: ', y);
end.
C параметром:
const n=7;
var
i, s: integer;
begin
s := 1;
for i := 1 to n do
s := s * i;
writeln('Цикл с параметром, факториал равен: ', s);
end.