В том, что каждый кадр, рисуется отдельно, потом скомпановывается в один файл.
Задание 1 32 * 40 * 64 * 8 = 655360
Задание 2 48 * 40 * 64 * 8 = 983040
Задание 3 64 * 40 * 64 * 8 = 1310720
Конструкция SmallString = string[l]; объяляет тип SmallString как строку из l символов. Для такого объявления l должно быть задано выше константой.
Методом сортировки выбором:
<span />
543261
--- 1
143265
--- 2
123465
--- 3
123456
<span />
Следовательно, за 3 перестановки.
Var i,q:integer;s:real;a:array[1..10]of integer;beginfor i:=1 to 10 do begina[i]:=random(100);s:=s+a[i];end;s:=s/10;for i:=1 to 10 do beginwriteln(a[i]);if a[i]>s then q:=q+i;end;writeln(q);end.