
Program SumAndMul;
Uses Crt;
var a:array[1..10] of real;
i:integer;
sum,mul:longint;
begin
clrscr;
for i:=1 to 10 do
begin
write('Введите -', i,' число:' );
readln(a[i]);
end;
sum:=0;mul:=1;
for i:=1 to 10 do
begin
if (a[i]>0) then sum:=sum+a[i];
if (a[i]<0 ) then mul:=mul*a[i];
end;
writeln('Сумма положительных элементов: ',sum);
writeln('Произведение отрицательных элементов: ',mul);
readkey;
end.
При покадровой анимации содержимое рабочей области изменяется в каждом кадре. Покадровая анимация наиболее хорошо подходит для сложной анимации, при которой изображение меняется в каждом кадре, а не перемещается по рабочей области. При покадровой анимации размер файла увеличивается сильнее, чем при tween-анимации. В покадровой анимации Flash хранит значения для каждого завершенного кадра.
Для создания покадровой анимации определите все кадры как ключевые и создайте различные изображения для каждого кадра. Изначально каждый новый ключевой кадр имеет то же содержимое, что и предшествующий ему ключевой кадр, поэтому можно последовательно модифицировать кадры анимации.
Объяснение: