Var i,p:integer;
begin
i:=11;
p:=1;
while i<=99 do
begin
p:=p*i;
i:=i+2;
end;
writeln(p)
end.
<em>// PascalABC.NET 3.2</em>
begin
var a:array[1..9] of integer;
var i:=1;
while i<=7 do begin
a[i]:=i*i+5;
a[i+1]:=Trunc(sqrt(a[i]));
a[i+2]:=a[i] div a[i+1];
i:=i+3
end;
for var j:=1 to 9 do Write(a[j],' ');
Writeln
end.
<u>Результат</u>
6 2 3 21 4 5 54 7 7
Если его параметр может принимать любое значение в пределах некоторого интервала!
1)запрещается трогать проводы,вилки
2)нельзя трогать компьютер мокрыми руками
3)нельзя включать интернет без разришения учитиля
4)если на компьютере появилось неизвесное вам окно предупредить учителя.
5)не знаю придумай сама(сам)
=)
Объяснение:
10+15+30=55км - длина грунтовой дороги.
55/20=11/4=2 3/4=2,75ч - время движения по грунтовой дороге;
50/30 +30/20=5/3 +3/2=1 4/6 +1 3/6=2 7/6=3 1/6 ч - время движения по новой и оставшейся грунтовой дороге.
2 3/4<3 1/6
Следовательно, минимально возможное время движения велосипедиста будет по грунтовой дороге. Время движения по которой составляет 2,75 часа.