Напишите программу вычисления произведений.(Turbo Pascal)

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

Ответы

Ответ дал: HelJohannsonProgramm
0

var x,n:integer;

begin

readln(n);

readln(x);

for i=:1 to n do

x:= (x-i);

end.


Если решение задачи будет не верно, извените значит надо писать более подробно.

Ответ дал: Smolllev
0
а что за
?
Ответ дал: HelJohannsonProgramm
0
Решение в ответах и объяснениях исправил.
Ответ дал: Smolllev
0
так у тебя всеравно так br
Ответ дал: HelJohannsonProgramm
0
Ну я всмсле из коменнов занёс в главный ответ.
Ответ дал: Smolllev
0
ааа
Похожие вопросы