<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) Нет. Емкость одностороннего DVD 4.7 Гб, емкость CD - 0.78 Гб.
2) Нет. Согласно стандарту на аудиодиски (CDDA), носящему название Red Book, максимальная продолжительность записи не может превышать 74 минуты.
3) Нет. См. 1).
4) Да. Типовой диаметр обоих дисков составляет 120 мм.
5) Да. Проигрыватели выпускаются с обратной совместимостью, т.е. более новая модель умеет проигрывать все старые форматы.
Вариант значения D и работы алгоритма:
D := 40
40 > 30 (Да)
Y := 40
Смотри картинку
1. - поет (потом рычит)
2. - рычит (потом кружится)
3. - кружится (потом машет хвостом)
4. - машет хвостом (потом зевает)
5. - зевает (потом пляшет)
6. - пляшет (потом поет)
Этот цикл длится 6 минут, за 44 минуты лисенок полностью пройдет его 7 раз и останется 2 действия. То есть, последний цикл заканчивается на "пляшет", +1 шаг - рычит, +1 шаг - рычит. Значит, лисенок через 44 минут будет рычать.