Question

Cоставьте программу вычисления произведения целых чисел из промежутка [-6;5)
Составить надо на PascalABC(ВАЖНО ЧТОБЫ ОНА БЫЛА ОТНОСИТЕЛЬНО ПРОСТОЙ Т.К Я 8 КЛАСС)

Answer 1

Program a1;
Uses Crt;
Var i,p:integer;
begin
p:=1;
for i:=-6 to 4 do
p:=p*i;
writeln('proizvedenie = ',p);
end.

Answer 2

var i, multi: integer;
begin
multi := 1;
for i := -6 to 4 do multi *= i;
write(multi);
end.