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

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

в избранное

alex-siminitzki

31 августа 2022

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.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Написать программу на паскале: найти разность между К и суммой всех элементов массива с нечетнымииндексами

Помогите срочноо) pascal abc 1. Развернуть обе половинки массива в обратном порядке

Помогите пожалуйста! Написать программу на языке Pascal решения квадратного уравнения

Вывести на экран числа в виде следующей таблицы: 162 27 73 3 38 8 84 4 4 49 9 9 9

Два туриста двигались с одинаковой скоростью. Первый прошел 8 км второй…

Какой из знаков показывает непечатаемые символа 1.¶ 2.€3.§4.¿или его тут нет?

Даны натуральные числа n,m и двумерный массив разиером…

Переведите пожалуйста 198,135 из десятичной сс в восьмеричную оставляя 6 знаков в дробной части новогочисла

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль:

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

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

Вычислить на паскале: p=(xt)!; n! =12… *n; t=1,5?

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