Если это паскаль
диапазон вводится с клавиатуры
program pr1;
var a,b,x:integer; p:longint;
begin
writeLn('введите диапазон'); read(a,b);
x:=a;
while (x div 10)=0 do
inc(x);
p:=x;
inc(x);
while x<=b do
begin
p:=p*x;
inc(x);
end;
writeLn('p=',p);
<span>end.</span>
Орган ухо если один то это юлитка. Канал слуха это тунель .
П0 1 П4 ИП4 2 * С/П КИП4 ИП4 ИП0 - x<0 03 С/П
Я думая так: Прогулка отменяется, идет дождь я останусь дома