Вычислить выражение, используя функцию для вычисления факториала

@alexberry · Регистрация: 09.02.2014

Author24 — интернет-сервис помощи студентам

Вычислить $https://www.cyberforum.ru/cgi-bin/latex.cgi?Fi=\sqrt{bi\, mod\, 6\, +\, 3)!}$ , используя функцию для вычисления факториала

@Svager · 07.03.2014, 22:10

alexberry, а что вычислить то? у вас просто выражение ?

@Myaeridan · 08.03.2014, 14:50

Pascal

program xx;
var f: real;
    b, i: integer;
procedure factorial(var f: real);
var n: integer;
    s: longint;
begin
 s:=1;
 for n:=1 to ((b*i mod 6) + 3) do
  s:=s*n;
 f:=sqrt(s);
end;
 
begin
 readln(i);
 readln(b);
 factorial(f); 
 writeln(f:0:3);
 readln;
end.

@alexberry · 08.03.2014, 17:20 **[ТС]**

Да, вместо bi чтобы числа подставлять

Добавлено через 34 минуты
Извините, не то условие. Нужно, используя 6-значное число, вычислить величины Fi (i=1,...6), где вид Fi определен выражением $https://www.cyberforum.ru/cgi-bin/latex.cgi?Fi=\sqrt{(bi\, mod\, 6\, +\, 3)!}$ . Использовать функцию вычисления факториала

@Myaeridan · 09.03.2014, 00:54

Pascal

program xx;
var f: real;
    b, i: integer;
procedure factorial(var f: real);
var n: integer;
    s: longint;
begin
 s:=1;
 for n:=1 to ((b*i mod 6) + 3) do
  s:=s*n;
 f:=sqrt(s);
end;
 
begin
 readln(b);
 for i:=1 to 6 do begin 
  factorial(f); 
  writeln(f:0:3);
 end;
end.

@alexberry · 11.03.2014, 14:56 **[ТС]**

Нужно, используя 6-значное число, вычислить величину Fi (i=1,...6), где вид Fi определен выражением
$https://www.cyberforum.ru/cgi-bin/latex.cgi?Fi=\sqrt{bi\, mod\, 6\, +\, 3)!}$ . Использовать функцию вычисления факториала

@CodeR · 12.03.2014, 13:07

Pascal

Var i,m,b:integer;
    f:real;
    s:string;
Function Fac(n:integer):integer;
Var p,i:integer;
Begin
    p:=1;
    For i:=2 to n do
     p:=p*i;
    Fac:=p;
End;
Begin
    Repeat 
     write('6-значное число: ');readln(b)
    Until b div 100000 > 0;
    Str(b,s);
    For i:=1 to 6 do
    Begin
      m:=ord(s[i])-48;
      f:=sqrt(Fac(m mod 6 + 3));
      writeln('F',i,' = ',f:0:2);
    End;
    readln;
End.

@alexberry 0 / 0 / 0 Регистрация: 09.02.2014 Сообщений: 14
		1
	Вычислить выражение, используя функцию для вычисления факториала 07.03.2014, 22:01. Показов 1458. Ответов 6 Метки нет (Все метки) Вычислить $https://www.cyberforum.ru/cgi-bin/latex.cgi?Fi=\sqrt{bi\, mod\, 6\, +\, 3)!}$ , используя функцию для вычисления факториала 0

@Svager 399 / 378 / 408 Регистрация: 14.09.2013 Сообщений: 1,204
	07.03.2014, 22:10	2
	alexberry, а что вычислить то? у вас просто выражение ? 0

@alexberry 0 / 0 / 0 Регистрация: 09.02.2014 Сообщений: 14
	08.03.2014, 17:20 [ТС]	4
	Да, вместо bi чтобы числа подставлять Добавлено через 34 минуты Извините, не то условие. Нужно, используя 6-значное число, вычислить величины Fi (i=1,...6), где вид Fi определен выражением $https://www.cyberforum.ru/cgi-bin/latex.cgi?Fi=\sqrt{(bi\, mod\, 6\, +\, 3)!}$ . Использовать функцию вычисления факториала 0

@alexberry 0 / 0 / 0 Регистрация: 09.02.2014 Сообщений: 14
	11.03.2014, 14:56 [ТС]	6
	Нужно, используя 6-значное число, вычислить величину Fi (i=1,...6), где вид Fi определен выражением $https://www.cyberforum.ru/cgi-bin/latex.cgi?Fi=\sqrt{bi\, mod\, 6\, +\, 3)!}$ . Использовать функцию вычисления факториала 0

	12.03.2014, 13:07