Регистрация
Nastyakk7
11.01.2022 22:47
Информатика
Есть ответ 👍

Вычислить на паскале: p=(xt)! ; n! =1*2**n; t=1,5? если x-чётное t=2, если х-нечётное

282
431
Посмотреть ответы 2

Ответы на вопрос:

led98918
led98918
4,5(68 оценок)

var

  x, i, p: integer;

begin

  write('x = '); readln(x);

  if x mod 2 = 0 then

        x : = trunc(x * 1.5)

  else

      x : = x * 2;

  p : = 1;

  for i : = 2 to x do

      p : = p * i;

  writeln('p = ', p);

end.

 

Paszhaa
Paszhaa
4,4(9 оценок)
Во вложении все удачи

Популярно: Информатика