Предмет: Информатика, автор: nikita9294

Напишите программу вычисления произведения. Расписать в TURBO PASCAL.

(x-1)(x-2)(x-3)...(x-n)


nikita9294: И напишите его как можно подробнее
HelJohannsonProgramm: Давайте завтра утром, вы ещё сможете?
HelJohannsonProgramm: В крации создали две переменные целые числа, запросили ввести с клавиатуры в них значения,for это цикл будет повторять столько раз сколько будет значение n, а дальше формула ваша (x-i).i от 1 до n.
nikita9294: да
nikita9294: завтра
HelJohannsonProgramm: Я переделаю программу она не выполняет свою задачу, извените.
nikita9294: хорошо
nikita9294: Привет когда программу сделаете?

Ответы

Автор ответа: HelJohannsonProgramm
0

var x,n:integer;


begin


readln(n);


readln(x);


for i=:1 to n do


x:= (x-i);


end.

Похожие вопросы