MATLAB

Ответы Подписаться на ответы

• 

  GREHERFGN0.00

  9.06.2022 12:25

  Program F;
  var
    p,x,N:integer;
  Begin
    Writeln('Введите число');
    Readln(x);
    p:=1;
    N:=1;
    if x=1 then Writeln('число ',x,'является фактриалом числа 0 ');
    While p<x  do
    Begin
      N:=N+1;
      p:=p*N;
    End;
    if p=x then Writeln('число ',x,'является фактриалом числа* ',N)
    else Writeln('число ',x,' не является фактриалом числа');
    Readln;
  End.

  Есть код на паскале, а нужно на матлабе

  Ответ

  Пожаловаться
  • 

    aBoomest+924.89

    9.06.2022 14:12

    Что значит без циклов? У вас же с циклами?

    Ответ

    Пожаловаться
    • 

      aBoomest+924.89

      9.06.2022 14:14

      https://se.mathworks.com/help/matlab/ref/factorial.html

      Но внутри наверно все равно цикл

      Ответ

      Пожаловаться
• 

  Centurio+37.00

  10.06.2022 06:48

  clear,clc
  x=input('Введите число: ');
  v=0:ceil(sqrt(x));
  k=v(x==factorial(v));
  m='';
  if isempty(k)
      m=' не';
  end
  disp(['Число ',num2str(x),m,' является факториалом числа ', num2str(k)])

  Ответ

  Пожаловаться