1. Дано натуральное n. Получить последовательность b1, b2, ... , bn, где при i =1,2,...,n значение bi = i! (записать на Pascale и алгоритмическом языке)

Предыдущий
вопрос Следующий
вопрос

На языке Pascal:

program FactorialSequence
va
n, i, factorial: integer
begi
write('Введите значение n: ')
readln(n)
for i := 1 to n d
begi
factorial := 1
for j := 1 to i d
begi
factorial := factorial * j
end
writeln('b', i, ' = ', factorial)
end
end.

На алгоритмическом языке:

1. Ввести значение
2. Для i от 1 до n
2.1. Установить factorial =
2.2. Для j от 1 до i
2.2.1. Умножить factorial на
2.3. Вывести 'b' + i + ' = ' + factorial