Войти Регистрация Спроси ai-bota

Вычислить: p=a(a-n) (a-2n)…(a-n2)

Ответ:

mboyko2005

04.10.2020 17:16

Var
a, p:real;
n, i:integer;
begin
write('a = ');
readln(a);
write('n = ');
readln(n);
p := a;
for i := 1 to n do
p := p * (a - i * n);
writeln('p = ', p);
readln;
end.

0,0(0 оценок)

Популярные вопросы: Информатика

kuchakshoevaZ

16.12.2021 17:48

1)напишите программу,которая в последовательности целых чисел определяет количество трехзначных чисел,не кратных 5 и 7 и не заканчивающихся 0 или 1. программа получает...

Lordfantomchik

16.12.2021 17:48

Как перенести таблицу из exel в word завтра !...

rimmabuketova

23.08.2020 19:27

Для создания гиперссылки следует выполнить цепочку команд которая состоит из:Выделите часть текста или рисунок Гиперссылка.Выборы перекрестная ссылка Вставка закладка...

aminyl

11.05.2020 09:44

1. Что такое компьютерная сеть? a. Множество компьютеров, связанных каналами передачи информации. b. Множество компьютеров. c. Один компьютер, связанный с телефонной...

ланя2

29.08.2021 04:14

Паскаль. для заданного x в последовательности вида sinx, sin((sin( первое число,меньше по модулю 0,01....

захарчинкозахар

15.03.2020 13:29

Почему летом жарко а зимой холодно? номер страницы?...

Кирилл11111111111110

30.03.2022 04:16

пл, 7 класс, информатика ...

ekaterinabajewa

23.12.2021 04:13

7. Используя вс алгоритмы, запрограммируйте рисование следующих фигур:...

anuar0403

03.07.2021 18:28

Периметр треугольнка авс равен 36 см. сумма длин сторон ав и вс равна 24 см. отношение длинны стороны ав к длине стороны вс равно 7 : 5. постройте треугольник а1св1,семиртична...

Lisa18811

03.07.2021 18:28

Очем свидетельствует разное положение конечностей относительно тулоdвища у разных классов позвоночных?...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку