Напишите программки вычисления произведения: a*(a+1)*(a+2)*...*(a+n-1)

Напишите программы вычисления творения: a*(a+1)*(a+2)*...*(a+n-1)

Задать свой вопрос
1 ответ
Program lol (input, output);
var a, n, b, i:integer;
begin
read (a, n);
b:=a;
for I=1 to n-1 do
a:=a*(b+I);
writeln (a);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт