Паскаль! Найдите произведение целых чисел от a до b, где a и b вводятся с клавиатурыю

1

Ответы и объяснения

2013-03-21T20:50:06+04:00


var a,b,i:integer;
proiz:real;
begin
proiz:=1;
readln (a,b);
for i:=a to b do
proiz:=proiz*i;
writeln (proiz);
end.