1 - n = input("Факториал числа ")<span>n = int(n)
fac = 1
i = 0
while i < n:
i += 1
fac = fac * i
print ("равен",fac<span>)
2 - </span></span>import operator<span>def fact(n):
return reduce(operator.mul, xrange(1, n + 1), 1)
print fact(5<span>)
3 -</span></span> import math <span>math.factorial(5)</span>
uses crt;
var ch,a,b:integer;
begin
readln(Ch);
a:=ch div 10;
b:=ch mod 10;
if a >b then writeln(a) else writeln(b);
readln;
end.
Sum = 80.
umn = 1584.
Результат в "PascalABCNET" смотри во вложении.
единственное что знаю 3 paint, 7 opera, 9 notepad(блокнот), 10 python.
var m:array[1..100000] of integer;
a,b,sum,sum2,n,k,i:integer;
begin
sum:=0;
k:=0;
sum2:=0;
readln(a,b,n);
randomize;
for i:=1 to n do begin m[i]:=random(a,b); if(m[i]<50) then begin sum:=sum+m[i]; k:=k+1; end;
if(m[i]>=50) then sum2:=sum2+m[i]; end;
for i:=1 to n do write(m[i],' ');
writeln;
writeln((sum/k):5:3,' ',(sum2/(n-k):5:3));
end.