составьте программку в системе паскаль 11

Составьте программку в системе паскаль 11

Задать свой вопрос
1 ответ
//// Pascal
var a,p,n,i:longint;
begin
var n,i:longint;
a,p:real;
begin
readln(a, n);
p:=1;
for i:=1 to n do
  p:=p*(a+i-1);
writeln('Произведение членов ряда: ',p);
end.


Входные данные: 3  4
Творенье членов ряда: 360





, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт