Вопрос по информатике:
Вычислить на паскале: p=(xt)!; n!=1*2*...*n; t=1,5? если x-чётное t=2, если х-нечётное
- 02.02.2018 22:28
- Информатика
- remove_red_eye 5946
- thumb_up 84
Ответы и объяснения 1
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.
- 04.02.2018 15:01
- thumb_up 42
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.